Skip to content

Commit

Permalink
#28
Browse files Browse the repository at this point in the history
tidy
  • Loading branch information
gfinak committed Jul 22, 2019
1 parent 5bcaea0 commit 0e92c59
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion R/spillover.R
Original file line number Diff line number Diff line change
Expand Up @@ -170,7 +170,7 @@ setMethod("spillover",
if (exact_match) {
channel_order <- sapply(cols, function(y)which(y == sampleNames(x)))
} else {
channel_order <- sapply(cols, grep, x = sampleNames(x), fixed = TRUE)
channel_order <- sapply(cols, grep, x = sampleNames(x), fixed = TRUE)
}
# Clip out those channels that do not match to a name
matched <- channel_order[sapply(channel_order, length) != 0]
Expand Down

0 comments on commit 0e92c59

Please sign in to comment.