data-raw/tissues.R

In eolagbaju/ODER: Optimising the Definition of Expressed Regions

tissue_options <- c(
    "adipose - subcutaneous", "adipose - visceral (omentum)", "adrenal gland", "artery - aorta", "artery - coronary",
    "artery - tibial", "bladder", "brain - amygdala", "brain - anterior cingulate cortex (ba24)", "brain - caudate (basal ganglia)",
    "brain - cerebellar hemisphere", "brain - cerebellum", "brain - cortex", "brain - frontal cortex (ba9)", "brain - hippocampus",
    "brain - hypothalamus", "brain - nucleus accumbens (basal ganglia)", "brain - putamen (basal ganglia)",
    "brain - spinal cord (cervical c-1)", "brain - substantia nigra", "breast - mammary tissue", "cells - ebv-transformed lymphocytes",
    "cells - transformed fibroblasts", "cervix - ectocervix", "cervix - endocervix", "colon - sigmoid", "colon - transverse",
    "esophagus - gastroesophageal junction", "esophagus - mucosa", "esophagus - muscularis", "fallopian tube",
    "heart - atrial appendage", "heart - left ventricle", "kidney - cortex", "liver", "lung", "minor salivary gland", "muscle - skeletal",
    "nerve - tibial", "ovary", "pancreas", "pituitary", "prostate", "skin - not sun exposed (suprapubic)",
    "skin - sun exposed (lower leg)", "small intestine - terminal ileum", "spleen", "stomach", "testis", "thyroid", "uterus", "vagina",
    "whole blood"
)

usethis::use_data(tissue_options, overwrite = TRUE)