Loading R/ConstructMetaspots.R +1 −1 Original line number Diff line number Diff line Loading @@ -21,7 +21,7 @@ ConstructMetaspots <- function( X <- GetAssayData(cur_seurat, slot='counts') # check to make sure this is just one sample: if(sum(unlist(lapply(Images(cur_seurat), function(x){nrow(cur_seurat@images[[x]]@coordinates) == 0}))) != 1){ if(sum(unlist(lapply(Images(cur_seurat), function(x){nrow(cur_seurat@images[[x]]@coordinates) != 0}))) != 1){ stop("More than one sample present in grouping. Please specify a metadata column with group.by indicating different ST samples.") } Loading Loading
R/ConstructMetaspots.R +1 −1 Original line number Diff line number Diff line Loading @@ -21,7 +21,7 @@ ConstructMetaspots <- function( X <- GetAssayData(cur_seurat, slot='counts') # check to make sure this is just one sample: if(sum(unlist(lapply(Images(cur_seurat), function(x){nrow(cur_seurat@images[[x]]@coordinates) == 0}))) != 1){ if(sum(unlist(lapply(Images(cur_seurat), function(x){nrow(cur_seurat@images[[x]]@coordinates) != 0}))) != 1){ stop("More than one sample present in grouping. Please specify a metadata column with group.by indicating different ST samples.") } Loading
