BUSTIN (BUlk and Single-cell Transcriptome data INtegration) is an R package, which identifies cell subpopulations that primarily express the genes of your interest, e.g. the drug resistant genes, by integrating bulk and single-cell transcriptome data.
BiocManager::install(c("Seurat","DESeq2","limma","cluster"))
devtools::install_github("zhangli-tools/BUSTIN")
library(Seurat)
library(BUSTIN)
resistant.genes=run.limma(bulk.data, pdata, resistant=T, padj=0.05, log2fc=0.5)
resistant.genes=run.DESeq(bulk.data, pdata, resistant=T, padj=0.05, log2fc=0.5)
hc.resistant.genes=hclust.geneset(seurat.obj = seurat.obj,maxK = 10,geneset = resistant.genes)
BUSTIN.out=predict.PAC(seurat.obj = seurat.obj,k.out.list = list(hc.resistant.genes),minModuleSize = 15)
cell.type=ORA.celltype(BUSTIN.out$seurat.obj,features = grep("m[0-9]+$", colnames(BUSTIN.out$seurat.obj@meta.data), value=T),group.by = "label") ## group.by is the label for the cell types.