simulate_na: simulate_na
In joon3216/funpark: Functions written by Junkyu Park

Description Usage Arguments Value Author(s) See Also Examples

Randomly replace some components in X_complete with NA based on na_rate specified.

1	simulate_na(X_complete, na_rate)

`X_complete`	A data or a matrix with no `NA`'s.
`na_rate`	A number in (0, 1).

A list:

X: A generated data with missing components.
C: !is.na(X)
na_rate: A specified na_rate when running the function.
na_rate_actual: The actual proportion of missing components after running the function.

Junkyu Park

impute_em, Imputing missing data using EM algorithm

set.seed(1024)
mu <- c(1, 2, 6)
Sigma <- matrix(c(118, 62, 44, 62, 49, 17, 44, 17, 21), nrow = 3)
n <- 400
X_truth <- MASS::mvrnorm(n = n, mu = mu, Sigma = Sigma)
result <- simulate_na(X_truth, na_rate = .4)