R/utils-seurat.R

Defines functions seurat_assay_has_scale_data is_seurat_assay

is_seurat_assay <- function(x) {
  inherits(x, "Assay")
}

seurat_assay_has_scale_data <- function(x) {
  stopifnot(is_seurat_assay(x))
  length(SeuratObject::GetAssayData(x, "scale.data")) > 0
}
TileDB-Inc/tiledbsc documentation built on Aug. 26, 2023, 2:32 p.m.