Error in `.oLikes(X = X, maxO = maxO, G = G, B = B, grossOuts = grossOuts, 
    kuiper = kuiper, pval = pval, modelNames = modelNames, mc.cores = mc.cores, 
    nmax = nmax, prnt = verb)`: Unknown error in the parallel computing. Try mc.cores=1 to detect the problem.

testfull<-oclust(X=dat,maxO = 10,G=2,grossOuts = gross,modelNames="EEE",mc.cores=2,nmax=20,verb=TRUE,scale=TRUE)
testkuiper<-oclust(X=dat,maxO = 10,G=2,grossOuts = gross,modelNames="EEE",mc.cores=2,nmax=20,kuiper=TRUE,pval=0.05,B=100,verb=TRUE,scale=TRUE)
expect_error(oclust(X=dat,maxO=10,G=3.5,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=20,verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10.2,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=20,verb=TRUE,scale=TRUE))
test_that("error for invalid modelNames", {
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVX",mc.cores = 1, nmax=20,verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=22.2,verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=-2,verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax="string",verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=2,verb="string",scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=2,verb=TRUE,scale="string"))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=2,kuiper=TRUE,pval=1.01,B=100,verb=TRUE,scale=TRUE))
expect_error(oclust(X=rnorm(100,0,1),maxO=10,G=3,grossOuts = NULL,modelNames="VVV",mc.cores = 1, nmax=2,verb=TRUE,scale=TRUE))
test_that("error more gross outliers than maxO", {
expect_error(oclust(X=dat,maxO=4,G=3,grossOuts = gross,modelNames="VVV",mc.cores = 1, nmax=2,verb=TRUE,scale=TRUE))
expect_error(oclust(X=dat,maxO=10,G=3,grossOuts = c("one","two","seventeen"),modelNames="VVV",mc.cores = 1, nmax=2,verb=TRUE,scale=TRUE))
test_that("error mus not vector minMD", {
test_that("error lists not same length minMD", {
test_that("error sigs not matrices minMD", {
test_that("error not int MixBetaDens", {
test_that("error not numeric MixBetaDens", {
test_that("n_g and var same length MixBetaDens", {
test_that("error for pval plot when no pval", {