Some problems when using ESCO to estimate parameters from real data.

[duohongrui]

Hi, ESCO is an essential tool to simulate datasets with cell groups. But recently, I encountered some problems when using ESCO to estimate parameters from read data.
The first problem

data <- matrix(rpois(2000*40,2),2000,40)
params <- ESCO::escoEstimate(data,
                             dirname = tempdir(),
                             group = TRUE,
                             cellinfo = paste0("group",
                                               sample(1:3, 40, replace = T)))

Error in validObject(object) : 
  invalid class “escoParams” object: : group.probs must sum to 1

The second problem

Error in manageparam(start.arg = start, fix.arg = fix.arg, obs = data, : 
Error in if (any(x < 0)) stop("values must be positive to fit an gamma distribution") : 
missing value where TRUE/FALSE needed

This failing fitting of real data to the gamma distribution contributes to the problem. There is a solution to this problem which was fixed in original Splatter package.

Can you check these problems and fix them? Thanks very much!