Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in 'missCompare-Ex.R' failed
The error most likely occurred in:

> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in ‘missCompare-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in 'missCompare-Ex.R' failed
The error most likely occurred in:

> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted
Running examples in 'missCompare-Ex.R' failed
The error most likely occurred in:

> ### Name: test_missMDA_EM
> ### Title: Testing the 'missMDA' EM missing data imputation algorithm
> ### Aliases: test_missMDA_EM
> 
> ### ** Examples
> 
> clindata_miss_mini <- clindata_miss[1:80,1:4]
> cleaned <- clean(clindata_miss_mini, missingness_coding = -9)
Variable(s) sex converted to numeric.
> metadata <- get_data(cleaned)
> simulated <- simulate(rownum = metadata$Rows, colnum = metadata$Columns,
+ cormat = metadata$Corr_matrix)
> miss_list <- all_patterns(simulated$Simulated_matrix,
+                     MD_pattern = metadata$MD_Pattern,
+                     NA_fraction = metadata$Fraction_missingness,
+                     min_PDM = 2)
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
62.5% of observations (with at least one missing datapoint) covered by setting min_PDM to 2
> 
> test_missMDA_EM(X_hat = simulated$Simulated_matrix, list = miss_list)
[1] "missMDA EM imputation - in progress"
Error in svd(A) : infinite or missing values in 'x'
Calls: test_missMDA_EM ... imputePCA -> impute -> <Anonymous> -> <Anonymous> -> svd
Execution halted