fixing length condition bug in controlStripPlot

hansenlab · Mar 5, 2020 · 0131037 · 0131037
1 parent 7f420e9
commit 0131037
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: minfi
-Version: 1.33.0
+Version: 1.33.1
 Title: Analyze Illumina Infinium DNA methylation arrays
 Description: Tools to analyze & visualize Illumina Infinium methylation arrays.
 Authors@R: c(person(c("Kasper", "Daniel"), "Hansen", role = c("cre", "aut"),

diff --git a/R/qc.R b/R/qc.R
@@ -68,7 +68,7 @@ controlStripPlot <- function(rgSet,
         ctl <- rbind(
             cbind(channel = "Red", ctlR),
             cbind(channel = "Green", ctlG))
-        if (any((ctl$value < xlim[1]) || (ctl$value > xlim[2]))) {
+        if (any((ctl$value < xlim[1]) | (ctl$value > xlim[2]))) {
             message("Warning: ", controlType, " probes outside plot range")
         }
         fig <- xyplot(