| ... | ... |
@@ -65,13 +65,14 @@ |
| 65 | 65 |
mustWork = TRUE) |
| 66 | 66 |
) |
| 67 | 67 |
## |
| 68 |
- nmf_result <- perform_nmf_func(Xmat, |
|
| 68 |
+ nmf_result <- reticulate::py_suppress_warnings( |
|
| 69 |
+ perform_nmf_func(Xmat, |
|
| 69 | 70 |
nPatterns = as.integer(kVal), |
| 70 | 71 |
nIter = as.integer(2000), |
| 71 | 72 |
givenAlpha = alphaVal, |
| 72 | 73 |
givenL1_ratio = 1, |
| 73 | 74 |
seed_val = as.integer(seedVal) |
| 74 |
- ) |
|
| 75 |
+ )) |
|
| 75 | 76 |
D_W <- as.matrix(get_features_matrix(nmf_result)) |
| 76 | 77 |
D_H <- as.matrix(get_samples_matrix(nmf_result)) |
| 77 | 78 |
return(list(featuresMatrix = D_W, samplesMatrix = D_H)) |
