Skip to content
Snippets Groups Projects
Commit 799956db authored by Gervaise Henry's avatar Gervaise Henry :cowboy:
Browse files

Have sc_Demultiplex us generic aggrigation_csv.csv file

parent b76082ea
No related merge requests found
...@@ -20,7 +20,7 @@ Project.Name <- opt$p ...@@ -20,7 +20,7 @@ Project.Name <- opt$p
setwd("../") setwd("../")
sc10x.data <- Read10X(data.dir="./analysis/DATA/10x/filtered_gene_bc_matrices_mex/GRCh38/") sc10x.data <- Read10X(data.dir="./analysis/DATA/10x/filtered_gene_bc_matrices_mex/GRCh38/")
sc10x <- new("seurat",raw.data=sc10x.data) sc10x <- new("seurat",raw.data=sc10x.data)
sc10x.aggr <- read_csv(paste0("./analysis/DATA/10x/",Project.Name,"-aggr.csv")) sc10x.aggr <- read_csv("./analysis/DATA/10x/aggregation_csv.csv")
cell.codes <- as.data.frame(sc10x@raw.data@Dimnames[[2]]) cell.codes <- as.data.frame(sc10x@raw.data@Dimnames[[2]])
colnames(cell.codes) <- "barcodes" colnames(cell.codes) <- "barcodes"
rownames(cell.codes) <- cell.codes$barcodes rownames(cell.codes) <- cell.codes$barcodes
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment