RunUMAP(., reduction = "pca", dims = 1:30)

Seurat::ProjectDim(object, reduction = reduction.save, overwrite = TRUE,
verbose = FALSE)

RunUMAP(., reduction = "harmony", dims = 1:30)

FindNeighbors(tonsil, reduction = "harmony", dims = 1:30)