update r script in sshicm pkg

stscl · Dec 17, 2024 · 7fe3a36 · 7fe3a36
1 parent d3cd7b2
commit 7fe3a36
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/R/sshic.R b/R/sshic.R
@@ -16,9 +16,7 @@
 #' baltim = sf::read_sf(system.file("extdata/baltim.gpkg",package = "sshicm"))
 #' sshic(baltim$PRICE,baltim$DWELL)
 #' }
-sshic = \(d, s, seed = 42,
-          permutation_number = 999,
-          bin_method = "Sturges") {
+sshic = \(d, s, seed = 42, permutation_number = 999, bin_method = "Sturges") {
   s = as.integer(as.factor(s))
   res = IC_SSHICM(d,s,seed,permutation_number,bin_method)
   names(res) = c("Ic","Pv")

diff --git a/R/sshin.R b/R/sshin.R
@@ -14,8 +14,7 @@
 #' cinc = sf::read_sf(system.file("extdata/cinc.gpkg",package = "sshicm"))
 #' sshin(cinc$THEFT_D,cinc$MALE)
 #' }
-sshin = \(d, s, seed = 42,
-          permutation_number = 999) {
+sshin = \(d, s, seed = 42, permutation_number = 999) {
   d = as.integer(as.factor(d))
   s = as.integer(as.factor(s))
   res = IN_SSHICM(d,s,seed,permutation_number)

diff --git a/R/zzz.R b/R/zzz.R
@@ -0,0 +1,3 @@
+.onLoad = function(...) {
+  loadNamespace("Rcpp")
+}