3.17-34

alexanderrobitzsch · Oct 20, 2023 · 2954120 · 2954120
1 parent ee4502a
commit 2954120
Show file tree

Hide file tree

Showing 6 changed files with 11 additions and 9 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: miceadds
 Type: Package
 Title: Some Additional Multiple Imputation Functions, Especially for 'mice'
-Version: 3.17-33
-Date: 2023-10-19 14:22:59.71054
+Version: 3.17-34
+Date: 2023-10-20 20:14:09.576992
 Author: 
     Alexander Robitzsch [aut,cre] (<https://orcid.org/0000-0002-8226-3132>),
     Simon Grund [aut] (<https://orcid.org/0000-0002-1290-8986>),

diff --git a/R/RcppExports.R b/R/RcppExports.R
@@ -1,5 +1,5 @@
 ## File Name: RcppExports.R
-## File Version: 3.017033
+## File Version: 3.017034
 # Generated by using Rcpp::compileAttributes() -> do not edit by hand
 # Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
 

diff --git a/R/mice.1chain.R b/R/mice.1chain.R
@@ -1,5 +1,5 @@
 ## File Name: mice.1chain.R
-## File Version: 0.669
+## File Version: 0.672
 
 #*** apply mice algorithm in a single chain
 mice.1chain <- function(data, burnin=10, iter=20, Nimp=10,
@@ -59,7 +59,8 @@ mice.1chain <- function(data, burnin=10, iter=20, Nimp=10,
         implist[[mm+1]] <- imp1 <- mice::mice( data, maxit=maxit_temp, m=1,
                     method=method, where=where, visitSequence=visitSequence,
                     blots=blots, post=post, defaultMethod=defaultMethod,
-                    printFlag=printFlag, seed=seed, data.init=data.init, ... )
+                    printFlag=printFlag, seed=seed, 
+                    data.init=mice::complete(implist[[mm]], action=1), ... )
         datlist[[mm]] <- dat0 <- mice::complete( imp1, 1 )
         chainMean <- rbind( chainMean, t( imp1$chainMean[,,1] ) )
         chainVar <- rbind( chainVar, t( imp1$chainVar[,,1] ) )

diff --git a/README.md b/README.md
@@ -24,9 +24,9 @@ The CRAN version can be installed from within R using:
 utils::install.packages("miceadds")
 ```
 
-#### GitHub version `miceadds` 3.17-33 (2023-10-19)
+#### GitHub version `miceadds` 3.17-34 (2023-10-20)
 
-[![](https://img.shields.io/badge/github%20version-3.17--33-orange.svg)](https://github.com/alexanderrobitzsch/miceadds)&#160;&#160;
+[![](https://img.shields.io/badge/github%20version-3.17--34-orange.svg)](https://github.com/alexanderrobitzsch/miceadds)&#160;&#160;
 
 The version hosted [here](https://github.com/alexanderrobitzsch/miceadds) is the development version of `miceadds`. 
 The GitHub version can be installed from within R using:

diff --git a/inst/NEWS b/inst/NEWS
@@ -44,12 +44,13 @@ CHANGELOG miceadds
 
 
 --------------------------------------------------------------------------
-VERSIONS miceadds 3.17  |  2023-10-19  |  Last: miceadds 3.17-33
+VERSIONS miceadds 3.17  |  2023-10-20  |  Last: miceadds 3.17-34
 --------------------------------------------------------------------------
 
 ADDED * added argument 'derived_vars' in mice.impute.pls() for including
         derived variables in PLS dimension reduction
         (requested by Karoline Sachse)
+FIXED * fixed specification issues in mice.1chain()
 
 
 DATA  * ---

diff --git a/src/RcppExports.cpp b/src/RcppExports.cpp
@@ -1,5 +1,5 @@
 //// File Name: RcppExports.cpp
-//// File Version: 3.017033
+//// File Version: 3.017034
 // Generated by using Rcpp::compileAttributes() -> do not edit by hand
 // Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393