R/miceadds_matrix2.R

In miceadds: Some Additional Multiple Imputation Functions, Especially for 'mice'

## File Name: miceadds_matrix2.R
## File Version: 0.05


miceadds_matrix2 <- function (x, nrow=NULL, ncol=NULL)
{
    if (is.null(ncol)) {
        ncol <- length(x)
    }
    if (is.null(nrow)) {
        nrow <- 1
    }
    y <- matrix(x, nrow=nrow, ncol=ncol, byrow=TRUE)
    return(y)
}