if (FALSE) {
hsa.meta <- ExtractPanglaoDBMeta(
species = "Homo sapiens",
protocol = c("Smart-seq2", "10x chromium"),
show.cell.type = TRUE, cell.num = c(1000, 2000)
)
hsa.seu <- ParsePanglaoDB(hsa.meta, merge = TRUE)
}
Run the code above in your browser using DataLab