SexSeek estimates genetic sex from bulk or single-cell expression counts, using
sex-chromosome marker expression and X-inactivation markers. Each sample, donor
or cell is called male, female, uncertain, possible_mixed or unknown,
with confidence metrics.
install.packages("SexSeek")
# development version
# remotes::install_github("saketlab/SexSeek")
install.packages("SexSeek", repos = c('https://saketlab.r-universe.dev', 'https://cloud.r-project.org'))
library(SexSeek)
path <- system.file("extdata", "example_counts.tsv.gz", package = "SexSeek")
counts <- as.matrix(read.delim(path, row.names = 1))
EstimateSex(counts, group = colnames(counts))
EstimateSex(counts) # matrix, sparse matrix, data frame
EstimateSex("counts.tsv.gz") # delimited file
EstimateSex("filtered_feature_bc_matrix/") # 10x MatrixMarket directory
EstimateSex("sample.h5") # 10x HDF5
EstimateSex(seurat_obj, group = "donor") # aggregate by a metadata column
Species is detected from the gene identifiers; pass species = "mouse" (common
or scientific name) to set it.
You can provide your own set of sex genes or fetch it from genevintage:
install.packages("genevintage")
sex_genes <- SexChromosomeGenes("human", release = 116, source = "ensembl")
EstimateSex(counts, species = "human", annotation = sex_genes)
EstimateSex(counts, species = "human", annotation = "genevintage")