data-raw/10x/SRR5167880_E18_20160930_Neurons_Sample_01_filtered_barcode.R

library(data.table)
library(TENxBrainData)
tenx <- TENxBrainData()

bc <- colData(tenx)[1:9970, ][["Barcode"]]
write.table(bc,
    "SRR5167880_E18_20160930_Neurons_Sample_01_filtered_barcode.tsv",
    quote = FALSE,
    row.names = FALSE,
    col.names = FALSE)
87875172/Scuff documentation built on March 28, 2024, 2:33 a.m.