library(Seurat) library(foreach) library(reshape2) library(ggplot2) library(psych) library(RColorBrewer) library(harmony) library(umap) sample_cols = unique(c(brewer ...