# NOT RUN {
data(IMdata)
# dimension of data
dim(IMdata)
# given the size of the dataset, the code below can take several minutes to run
if(interactive()){
# Don't transform Time et Cell_length column
num_col <- 3:ncol(IMdata)
# Build Cytoftree binary tree
tree <- CytofTree(M = IMdata, minleaf = 1, t = 0.1, transformation = "asinh", num_col = num_col)
# Annotation
annot <- Annotation(tree, plot = FALSE, K2markers = colnames(IMdata))
# Provide subpopulations
annot$combinations
}
# }
Run the code above in your browser using DataLab