R/simulate.R:
GITHUB
emitanaka/simulate: Parametric simulation framework to generate complex multivariate and multilevel data
)), ncol = length(x))
Mdot <- matrix(".", ncol = ncol(M), nrow = nrow(M))
nclass <- attr(x, "nclass")