version 1.0.4

cran · Dec 16, 2023 · eb5b8a9 · eb5b8a9
1 parent 6fde9e2
commit eb5b8a9
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 7 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: samplingin
 Title: Dynamic Survey Sampling Solutions
-Version: 1.0.3
+Version: 1.0.4
 Authors@R: 
     person("Choerul", "Afifanto", , "choerulafifanto@gmail.com", role = c("aut", "cre", "cph"))
 Description: A robust solution employing both systematic and PPS
@@ -15,8 +15,8 @@ Encoding: UTF-8
 LazyData: true
 RoxygenNote: 7.2.1
 NeedsCompilation: no
-Packaged: 2023-12-14 04:40:05 UTC; User
+Packaged: 2023-12-14 07:49:13 UTC; User
 Author: Choerul Afifanto [aut, cre, cph]
 Maintainer: Choerul Afifanto <choerulafifanto@gmail.com>
 Repository: CRAN
-Date/Publication: 2023-12-14 05:10:02 UTC
+Date/Publication: 2023-12-15 09:50:05 UTC
diff --git a/MD5 b/MD5
@@ -1,10 +1,10 @@
-9d09d251cf7116729543d87999740a3f *DESCRIPTION
+b642a9b991db0108043d4ec8de1d1f88 *DESCRIPTION
 0a0864f9583c81707387e99a5d9b6205 *LICENSE
 9ca8510dff33972e0aecd72870dcbf83 *NAMESPACE
-db949ea49f20bd997a2566eb21b18bc5 *NEWS.md
+300e519dc792250a769166c65d01c2d6 *NEWS.md
 1dd792b86cbd22c58d3b414c76895b90 *R/data.R
 6c99f077dc69186674f3dadcd1eb9801 *R/global.R
-85c1a597b16eb66671d3d6574c0af1a3 *R/samplingin.R
+54facb885d610dc3982041a4506532a2 *R/samplingin.R
 b607675a460f815c9e9341f4b711f668 *README.md
 36b7c180d46df42cdcfd4bc6d3584568 *data/alokasi_dt.rda
 52dad9ede25dd9a0ece1aa7182a5f6d6 *data/pop_dt.rda

diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,5 @@
+# samplingin 1.0.4
+
 # samplingin 1.0.3
 
 # samplingin 1.0.2

diff --git a/R/samplingin.R b/R/samplingin.R
@@ -691,7 +691,7 @@ doSampling = function(pop, alloc, nsampel, type, strata=NULL, ident=c("kdprov","
                     # cat(nTemp," == ",as.numeric(ix), " == ", fs,"\n")
                     # Cek apakah BS terpilih lebih dari sekali
                     if(fs == last_fs){
-                      if(verbose) cat(lis[["ar"]],"\n")
+                      # if(verbose) cat(lis[["ar"]],"\n")
                       if(verbose) cat("ix: ",as.numeric(ix)," last_fs: ",last_fs," fs: ",fs,"\n")
                       if(verbose) cat("INDEX SAMA (ULANG)\n")
                       isUlang = TRUE