CRAN Package Check Results for Package gridGraphics

Last updated on 2018-02-25 07:47:24 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.2 4.44 46.07 50.51 OK
r-devel-linux-x86_64-debian-gcc 0.2 3.52 35.72 39.24 OK
r-devel-linux-x86_64-fedora-clang 0.2 64.59 OK
r-devel-linux-x86_64-fedora-gcc 0.2 64.52 OK
r-devel-windows-ix86+x86_64 0.2 14.00 117.00 131.00 OK
r-patched-linux-x86_64 0.2 0.86 47.47 48.33 OK
r-patched-solaris-x86 0.2 44.90 ERROR
r-release-linux-x86_64 0.2 0.87 47.24 48.11 OK
r-release-windows-ix86+x86_64 0.2 4.00 83.00 87.00 OK
r-release-osx-x86_64 0.2 ERROR
r-oldrel-windows-ix86+x86_64 0.2 4.00 87.00 91.00 OK
r-oldrel-osx-x86_64 0.2 OK

Check Details

Version: 0.2
Check: tests
Result: ERROR
     Creating ‘aardvark.R’
     Running ‘demo-graphics.R’ [2s/11s]
    Running the tests in ‘tests/demo-graphics.R’ failed.
    Complete output:
     > require(datasets)
     > require(grDevices); require(graphics)
     >
     > library(gridGraphics)
     Loading required package: grid
     >
     > demo1 <- function() {
     + x <- stats::rnorm(50)
     + par(bg = "white")
     + plot(x, ann = FALSE, type = "n")
     + abline(h = 0, col = gray(.90))
     + lines(x, col = "green4", lty = "dotted")
     + points(x, bg = "limegreen", pch = 21)
     + title(main = "Simple Use of Color In a Plot",
     + xlab = "Just a Whisper of a Label",
     + col.main = "blue", col.lab = gray(.8),
     + cex.main = 1.2, cex.lab = 1.0, font.main = 4, font.lab = 3)
     + }
     >
     > demo2 <- function() {
     + par(bg = "gray")
     + pie(rep(1,24), col = rainbow(24), radius = 0.9)
     + title(main = "A Sample Color Wheel", cex.main = 1.4, font.main = 3)
     + title(xlab = "(Use this as a test of monitor linearity)",
     + cex.lab = 0.8, font.lab = 3)
     + }
     >
     > demo3 <- function() {
     + pie.sales <- c(0.12, 0.3, 0.26, 0.16, 0.04, 0.12)
     + names(pie.sales) <- c("Blueberry", "Cherry",
     + "Apple", "Boston Cream", "Other", "Vanilla Cream")
     + pie(pie.sales,
     + col = c("purple","violetred1","green3","cornsilk","cyan","white"))
     + title(main = "January Pie Sales", cex.main = 1.8, font.main = 1)
     + title(xlab = "(Don't try this at home kids)", cex.lab = 0.8, font.lab = 3)
     + }
     >
     > demo4 <- function() {
     + par(bg="cornsilk")
     + n <- 10
     + g <- gl(n, 100, n*100)
     + x <- rnorm(n*100) + sqrt(as.numeric(g))
     + boxplot(split(x,g), col="lavender", notch=TRUE)
     + title(main="Notched Boxplots", xlab="Group", font.main=4, font.lab=1)
     + }
     >
     > demo5 <- function() {
     + par(bg="white")
     + n <- 100
     + x <- c(0,cumsum(rnorm(n)))
     + y <- c(0,cumsum(rnorm(n)))
     + xx <- c(0:n, n:0)
     + yy <- c(x, rev(y))
     + plot(xx, yy, type="n", xlab="Time", ylab="Distance")
     + polygon(xx, yy, col="gray")
     + title("Distance Between Brownian Motions")
     + }
     >
     > demo6 <- function() {
     + x <- c(0.00, 0.40, 0.86, 0.85, 0.69, 0.48, 0.54, 1.09, 1.11, 1.73, 2.05, 2.02)
     + par(bg="lightgray")
     + plot(x, type="n", axes=FALSE, ann=FALSE)
     + usr <- par("usr")
     + rect(usr[1], usr[3], usr[2], usr[4], col="cornsilk", border="black")
     + lines(x, col="blue")
     + points(x, pch=21, bg="lightcyan", cex=1.25)
     + axis(2, col.axis="blue", las=1)
     + axis(1, at=1:12, lab=month.abb, col.axis="blue")
     + box()
     + title(main= "The Level of Interest in R", font.main=4, col.main="red")
     + title(xlab= "1996", col.lab="red")
     + }
     >
     > demo7 <- function() {
     + par(bg="cornsilk")
     + set.seed(1)
     + x <- rnorm(1000)
     + hist(x, xlim=range(-4, 4, x), col="lavender", main="")
     + title(main="1000 Normal Random Variates", font.main=3)
     + }
     >
     > demo8 <- function() {
     + pairs(iris[1:4], main="Edgar Anderson's Iris Data", font.main=4, pch=19)
     + }
     >
     > demo9 <- function() {
     + pairs(iris[1:4], main="Edgar Anderson's Iris Data", pch=21,
     + bg = c("red", "green3", "blue")[unclass(iris$Species)])
     + }
     >
     > demo10 <- function() {
     + x <- 10*1:nrow(volcano)
     + y <- 10*1:ncol(volcano)
     + lev <- pretty(range(volcano), 10)
     + par(bg = "lightcyan")
     + pin <- par("pin")
     + xdelta <- diff(range(x))
     + ydelta <- diff(range(y))
     + xscale <- pin[1]/xdelta
     + yscale <- pin[2]/ydelta
     + scale <- min(xscale, yscale)
     + xadd <- 0.5*(pin[1]/scale - xdelta)
     + yadd <- 0.5*(pin[2]/scale - ydelta)
     + plot(numeric(0), numeric(0),
     + xlim = range(x)+c(-1,1)*xadd, ylim = range(y)+c(-1,1)*yadd,
     + type = "n", ann = FALSE)
     + usr <- par("usr")
     + rect(usr[1], usr[3], usr[2], usr[4], col="green3")
     + clines <- contourLines(x, y, volcano, levels = lev)
     + lapply(clines, lines, col="yellow", lty="solid")
     + box()
     + title("A Topographic Map of Maunga Whau", font= 4)
     + title(xlab = "Meters North", ylab = "Meters West", font= 3)
     + mtext("10 Meter Contour Spacing", side=3, line=0.35, outer=FALSE,
     + at = mean(par("usr")[1:2]), cex=0.7, font=3)
     + }
     >
     > demo11 <- function() {
     + par(bg="cornsilk")
     + coplot(lat ~ long | depth, data = quakes, pch = 21, bg = "green3")
     + }
     >
     > plotdiff(expression(demo1()), "demo-1")
     Error in if (result == "0") { : argument is of length zero
     Calls: plotdiff -> plotcompare
     Execution halted
Flavor: r-patched-solaris-x86

Version: 0.2
Check: whether package can be installed
Result: ERROR
    Installation failed.
Flavor: r-release-osx-x86_64