# NOT RUN {
# load Seurat object from SignacFast example
P <- readRDS("pbmcs.rds")
# run feature selection + bootstrapping to generate 2,000 bootstrapped cells
x = P@meta.data$celltypes
R_learned = SignacBoot(P, L = c("B.naive", "B.memory"), labels = x)
# }
Run the code above in your browser using DataLab