diff --git a/R/preprocess_object_for_CNV.R b/R/preprocess_object_for_CNV.R index be79fea..550fb47 100644 --- a/R/preprocess_object_for_CNV.R +++ b/R/preprocess_object_for_CNV.R @@ -32,6 +32,7 @@ preprocess_object_for_CNV <- function(genes_by_cells=NULL, gene_ann=NULL) { gene_locations <- merge(gene_locations, temp, by=c("gene_id", "Chromosome"), sort=F) gene_locations$pos <- apply(abs(gene_locations[, c("start_location", "end_location")]), 1, min) gene_locations$gene_id <- gene_locations$start_location <- gene_locations$end_location <- NULL + gene_locations <- unique(gene_locations) #gene_locations$end_location <- NULL }