Commit 21ef43a5 authored by Gervaise Henry's avatar Gervaise Henry 🤠
Browse files

Double [] for merge arg

parent 92c1a74a
......@@ -111,7 +111,7 @@ merges <- NULL
merges <- NULL
for (i in unique(sc10x.groups$Patient[sc10x.groups$Keep==1])){
for (j in sc10x.groups$Samples[sc10x.groups$Keep==1]){
if (sc10x.groups[sc10x.groups$Samples==j,][opt$merge]==i){
if (sc10x.groups[sc10x.groups$Samples==j,][[opt$merge]]==i){
merges <- c(merges,j)
}
}
......
Markdown is supported
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