Merge pull request #162 from ShixiangWang/devel

Fix #161
ShixiangWang · May 7, 2020 · 974827f · 974827f
2 parents 50e0e00 + 224f933
commit 974827f
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -2,6 +2,7 @@
 
 - Added profile plot for DBS and INDEL.
 - Fixed error for signature extraction in mode 'DBS' or 'ID'.
+- Fixed method 'M' for CN tally cannot work when `cores > 1` (#161).
 
 # sigminer 1.0.3
 

diff --git a/R/helper_fit_cn_components.R b/R/helper_fit_cn_components.R
@@ -99,8 +99,8 @@ fitComponent <-
         logLiks <- t(sapply(z_list, function(x) x[["logLiks"]]))
       }
 
-      logLiks <- logLiks[is.finite(sapply(z, logLik)), , drop = FALSE]
-      z <- z[is.finite(sapply(z, logLik))]
+      logLiks <- logLiks[is.finite(sapply(z, flexmix::logLik)), , drop = FALSE]
+      z <- z[is.finite(sapply(z, flexmix::logLik))]
       rownames(logLiks) <- names(z)
       if (!length(z)) {
         stop("No convergence to a suitable mixture")