Get/set some global options for openCyto
1 2 3 4 5 6 7 8 9 10 | opt <- getOption("openCyto")
#the threshold of minimum cell events required for the gating algorithm to proceed
opt[["gating"]][["minEvents"]]
#to change the threshold
opt[["gating"]][["minEvents"]] <- 100
options(openCyto = opt)
#switch off the validity check flags(Not recommended)
opt[["check.pop"]] <- FALSE
options(openCyto = opt)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.