Adapt to minfi DataFrame class. Additional as.data.frame added to wor…

…k with ggplot
hbc · Oct 26, 2017 · c3eb38d · c3eb38d
1 parent 52ae43a
commit c3eb38d
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/mdsplot.RGset.R b/R/mdsplot.RGset.R
@@ -37,6 +37,7 @@ mdsplot.RGset <- function (dat, numPositions = 1000, sampGroups, sampNames, main
   # generate color factors for ggplot
   fit$col <- fit[,sampGroups]
   fit$col <- as.character(fit$col)
+  fit <- as.data.frame(fit) # Required again as new minfi returns DataFrame class, not data.frame
   # factor colors in palette by sampGroups
   if (missing(sampNames)) {
     ggplot(fit, aes(x=x, y=y, color=col))+