[Robast-commits] r439 - branches/robast-0.9/pkg/RobAStBase/R branches/robast-0.9/pkg/RobLoxBioC/R pkg/RobAStBase/R pkg/RobLoxBioC/R
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Thu Dec 2 19:00:13 CET 2010
Author: ruckdeschel
Date: 2010-12-02 19:00:13 +0100 (Thu, 02 Dec 2010)
New Revision: 439
Modified:
branches/robast-0.9/pkg/RobAStBase/R/AllPlot.R
branches/robast-0.9/pkg/RobAStBase/R/comparePlot.R
branches/robast-0.9/pkg/RobAStBase/R/infoPlot.R
branches/robast-0.9/pkg/RobLoxBioC/R/AffySimStudyFunction.R
branches/robast-0.9/pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R
pkg/RobAStBase/R/AllPlot.R
pkg/RobAStBase/R/comparePlot.R
pkg/RobAStBase/R/infoPlot.R
pkg/RobLoxBioC/R/AffySimStudyFunction.R
pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R
Log:
commented out all assignments of type omar$cin <- NULL
Modified: branches/robast-0.9/pkg/RobAStBase/R/AllPlot.R
===================================================================
--- branches/robast-0.9/pkg/RobAStBase/R/AllPlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ branches/robast-0.9/pkg/RobAStBase/R/AllPlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -174,7 +174,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
on.exit(par(opar))
if (!withSweave)
devNew()
Modified: branches/robast-0.9/pkg/RobAStBase/R/comparePlot.R
===================================================================
--- branches/robast-0.9/pkg/RobAStBase/R/comparePlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ branches/robast-0.9/pkg/RobAStBase/R/comparePlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -227,7 +227,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
if(mfColRow) on.exit(par(opar))
if(mfColRow)
Modified: branches/robast-0.9/pkg/RobAStBase/R/infoPlot.R
===================================================================
--- branches/robast-0.9/pkg/RobAStBase/R/infoPlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ branches/robast-0.9/pkg/RobAStBase/R/infoPlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -236,7 +236,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
if(mfColRow) on.exit(par(opar))
# if (!withSweave)
# devNew()
Modified: branches/robast-0.9/pkg/RobLoxBioC/R/AffySimStudyFunction.R
===================================================================
--- branches/robast-0.9/pkg/RobLoxBioC/R/AffySimStudyFunction.R 2010-12-02 15:19:30 UTC (rev 438)
+++ branches/robast-0.9/pkg/RobLoxBioC/R/AffySimStudyFunction.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -76,7 +76,7 @@
plot(c(0,1), c(1, 0), type = "n", axes = FALSE)
legend("center", c("ML", "Med/MAD", "biweight", "rmx"),
fill = myCol, ncol = 4, cex = 1.5)
- op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
+# op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
on.exit(par(op))
}
Modified: branches/robast-0.9/pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R
===================================================================
--- branches/robast-0.9/pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R 2010-12-02 15:19:30 UTC (rev 438)
+++ branches/robast-0.9/pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -83,7 +83,7 @@
plot(c(0,1), c(1, 0), type = "n", axes = FALSE)
legend("center", c("ML", "Med/MAD", "Illumina", "rmx"),
fill = myCol, ncol = 4, cex = 1.5)
- op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
+# op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
on.exit(par(op))
}
Modified: pkg/RobAStBase/R/AllPlot.R
===================================================================
--- pkg/RobAStBase/R/AllPlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ pkg/RobAStBase/R/AllPlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -174,7 +174,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
on.exit(par(opar))
if (!withSweave)
devNew()
Modified: pkg/RobAStBase/R/comparePlot.R
===================================================================
--- pkg/RobAStBase/R/comparePlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ pkg/RobAStBase/R/comparePlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -227,7 +227,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
if(mfColRow) on.exit(par(opar))
if(mfColRow)
Modified: pkg/RobAStBase/R/infoPlot.R
===================================================================
--- pkg/RobAStBase/R/infoPlot.R 2010-12-02 15:19:30 UTC (rev 438)
+++ pkg/RobAStBase/R/infoPlot.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -236,7 +236,7 @@
options(warn = -1)
on.exit(options(warn = w0))
opar <- par(no.readonly = TRUE)
- opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
+# opar$cin <- opar$cra <- opar$csi <- opar$cxy <- opar$din <- NULL
if(mfColRow) on.exit(par(opar))
# if (!withSweave)
# devNew()
Modified: pkg/RobLoxBioC/R/AffySimStudyFunction.R
===================================================================
--- pkg/RobLoxBioC/R/AffySimStudyFunction.R 2010-12-02 15:19:30 UTC (rev 438)
+++ pkg/RobLoxBioC/R/AffySimStudyFunction.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -76,7 +76,7 @@
plot(c(0,1), c(1, 0), type = "n", axes = FALSE)
legend("center", c("ML", "Med/MAD", "biweight", "rmx"),
fill = myCol, ncol = 4, cex = 1.5)
- op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
+# op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
on.exit(par(op))
}
Modified: pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R
===================================================================
--- pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R 2010-12-02 15:19:30 UTC (rev 438)
+++ pkg/RobLoxBioC/R/IlluminaSimStudyFunction.R 2010-12-02 18:00:13 UTC (rev 439)
@@ -83,7 +83,7 @@
plot(c(0,1), c(1, 0), type = "n", axes = FALSE)
legend("center", c("ML", "Med/MAD", "Illumina", "rmx"),
fill = myCol, ncol = 4, cex = 1.5)
- op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
+# op$cin <- op$cra <- op$csi <- op$cxy <- op$din <- NULL
on.exit(par(op))
}
More information about the Robast-commits
mailing list