doubletFinder_v3_SeuratV5<-function(seu,PCs,pN=0.25,pK,nExp,reuse.pANN=FALSE,sct=FALSE,annotations=NULL) { require(Seurat) require(fields) require(KernSmooth)if(reuse.pANN!=FALSE) {pANN.old<-seu@meta.data[,reuse.pANN]classifications<-rep("Singlet", length(pANN.old))classifications[order(pAN...