* using log directory 'd:/Rcompile/CRANpkg/local/3.0/ade4.Rcheck' * using R version 3.0.3 (2014-03-06) * using platform: i386-w64-mingw32 (32-bit) * using session charset: ISO8859-1 * checking for file 'ade4/DESCRIPTION' ... OK * this is package 'ade4' version '1.7-2' * package encoding: UTF-8 * checking package namespace information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking if there is a namespace ... OK * checking for hidden files and directories ... OK * checking for portable file names ... OK * checking whether package 'ade4' can be installed ... OK * checking installed package size ... NOTE installed size is 5.6Mb sub-directories of 1Mb or more: data 1.9Mb pictures 2.1Mb * checking package directory ... OK * checking DESCRIPTION meta-information ... OK * checking top-level files ... OK * checking for left-over files ... OK * checking index information ... OK * checking package subdirectories ... OK * checking R files for non-ASCII characters ... OK * checking R files for syntax errors ... OK * loading checks for arch 'i386' ** checking whether the package can be loaded ... OK ** checking whether the package can be loaded with stated dependencies ... OK ** checking whether the package can be unloaded cleanly ... OK ** checking whether the namespace can be loaded with stated dependencies ... OK ** checking whether the namespace can be unloaded cleanly ... OK ** checking loading without being on the library search path ... OK * loading checks for arch 'x64' ** checking whether the package can be loaded ... OK ** checking whether the package can be loaded with stated dependencies ... OK ** checking whether the package can be unloaded cleanly ... OK ** checking whether the namespace can be loaded with stated dependencies ... OK ** checking whether the namespace can be unloaded cleanly ... OK ** checking loading without being on the library search path ... OK * checking dependencies in R code ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking R code for possible problems ... OK * checking Rd files ... OK * checking Rd metadata ... OK * checking Rd cross-references ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * checking Rd contents ... OK * checking for unstated dependencies in examples ... OK * checking contents of 'data' directory ... OK * checking data for non-ASCII characters ... OK * checking data for ASCII and uncompressed saves ... OK * checking line endings in C/C++/Fortran sources/headers ... OK * checking line endings in Makefiles ... OK * checking compilation flags in Makevars ... OK * checking for portable use of $(BLAS_LIBS) and $(LAPACK_LIBS) ... OK * checking compiled code ... OK * checking examples ... ** running examples for arch 'i386' ... ERROR Running examples in 'ade4-Ex.R' failed The error most likely occurred in: > ### Name: westafrica > ### Title: Freshwater fish zoogeography in west Africa > ### Aliases: westafrica > ### Keywords: datasets > > ### ** Examples > > data(westafrica) > > if(!adegraphicsLoaded()) { + s.label(westafrica$cadre, xlim = c(30, 500), ylim = c(50, 290), + cpoi = 0, clab = 0, grid = FALSE, addax = 0) + old.par <- par(no.readonly = TRUE) + par(mar = c(0.1, 0.1, 0.1, 0.1)) + rect(30, 0, 500, 290) + polygon(westafrica$atlantic, col = "lightblue") + points(westafrica$riv.xy, pch = 20, cex = 1.5) + apply(westafrica$lines, 1, function(x) segments(x[1], x[2], x[3], x[4], lwd = 1)) + apply(westafrica$riv.xy,1, function(x) segments(x[1], x[2], x[3], x[4], lwd = 1)) + text(c(175, 260, 460, 420), c(275, 200, 250, 100), c("Senegal", "Niger", "Niger", "Volta")) + par(srt = 270) + text(westafrica$riv.xy$x2, westafrica$riv.xy$y2-10, westafrica$riv.names, adj = 0, cex = 0.75) + par(old.par) + rm(old.par) + } > > # multivariate analysis > afri.w <- data.frame(t(westafrica$tab)) > afri.dist <- dist.binary(afri.w,1) > afri.pco <- dudi.pco(afri.dist, scan = FALSE, nf = 3) > if(adegraphicsLoaded()) { + G1 <- s1d.barchart(afri.pco$li[, 1:3], p1d.hori = F, plab.cex = 0) + } else { + par(mfrow = c(3, 1)) + barplot(afri.pco$li[, 1]) + barplot(afri.pco$li[, 2]) + barplot(afri.pco$li[, 3]) + } > > if(requireNamespace("spdep", quiet = TRUE)) { + # multivariate spatial analysis + afri.neig <- neig(n.line = 33) + afri.nb <- neig2nb(afri.neig) + afri.listw <- nb2listw(afri.nb) + afri.ms <- multispati(afri.pco, afri.listw, scan = FALSE, nfposi = 6, nfnega = 0) + + if(adegraphicsLoaded()) { + G2 <- s1d.barchart(afri.ms$li[, 1:3], p1d.hori = F, plab.cex = 0) + + g31 <- s.label(afri.ms$li, plab.cex = 0.75, ppoi.cex = 0, nb = afri.nb, plot = F) + g32 <- s.value(afri.ms$li, afri.ms$li[, 3], plot = F) + g33 <- s.value(afri.ms$li, afri.ms$li[, 4], plot = F) + g34 <- s.value(afri.ms$li, afri.ms$li[, 5], plot = F) + G3 <- ADEgS(list(g31, g32, g33, g34), layout = c(2, 2)) + + } else { + par(mfrow = c(3, 1)) + barplot(afri.ms$li[, 1]) + barplot(afri.ms$li[, 2]) + barplot(afri.ms$li[, 3]) + + par(mfrow = c(2, 2)) + s.label(afri.ms$li, clab = 0.75, cpoi = 0, neig = afri.neig, cneig = 1.5) + s.value(afri.ms$li, afri.ms$li[, 3]) + s.value(afri.ms$li, afri.ms$li[, 4]) + s.value(afri.ms$li, afri.ms$li[, 5]) + } + summary(afri.ms) + } Loading required namespace: spdep Failed with error: 'unused argument (quiet = TRUE)' > > par(mfrow = c(1, 1)) > plot(hclust(afri.dist, "ward.D"), h = -0.2) Error in hclust(afri.dist, "ward.D") : invalid clustering method Calls: plot -> hclust Execution halted ** running examples for arch 'x64' ... ERROR Running examples in 'ade4-Ex.R' failed The error most likely occurred in: > ### Name: westafrica > ### Title: Freshwater fish zoogeography in west Africa > ### Aliases: westafrica > ### Keywords: datasets > > ### ** Examples > > data(westafrica) > > if(!adegraphicsLoaded()) { + s.label(westafrica$cadre, xlim = c(30, 500), ylim = c(50, 290), + cpoi = 0, clab = 0, grid = FALSE, addax = 0) + old.par <- par(no.readonly = TRUE) + par(mar = c(0.1, 0.1, 0.1, 0.1)) + rect(30, 0, 500, 290) + polygon(westafrica$atlantic, col = "lightblue") + points(westafrica$riv.xy, pch = 20, cex = 1.5) + apply(westafrica$lines, 1, function(x) segments(x[1], x[2], x[3], x[4], lwd = 1)) + apply(westafrica$riv.xy,1, function(x) segments(x[1], x[2], x[3], x[4], lwd = 1)) + text(c(175, 260, 460, 420), c(275, 200, 250, 100), c("Senegal", "Niger", "Niger", "Volta")) + par(srt = 270) + text(westafrica$riv.xy$x2, westafrica$riv.xy$y2-10, westafrica$riv.names, adj = 0, cex = 0.75) + par(old.par) + rm(old.par) + } > > # multivariate analysis > afri.w <- data.frame(t(westafrica$tab)) > afri.dist <- dist.binary(afri.w,1) > afri.pco <- dudi.pco(afri.dist, scan = FALSE, nf = 3) > if(adegraphicsLoaded()) { + G1 <- s1d.barchart(afri.pco$li[, 1:3], p1d.hori = F, plab.cex = 0) + } else { + par(mfrow = c(3, 1)) + barplot(afri.pco$li[, 1]) + barplot(afri.pco$li[, 2]) + barplot(afri.pco$li[, 3]) + } > > if(requireNamespace("spdep", quiet = TRUE)) { + # multivariate spatial analysis + afri.neig <- neig(n.line = 33) + afri.nb <- neig2nb(afri.neig) + afri.listw <- nb2listw(afri.nb) + afri.ms <- multispati(afri.pco, afri.listw, scan = FALSE, nfposi = 6, nfnega = 0) + + if(adegraphicsLoaded()) { + G2 <- s1d.barchart(afri.ms$li[, 1:3], p1d.hori = F, plab.cex = 0) + + g31 <- s.label(afri.ms$li, plab.cex = 0.75, ppoi.cex = 0, nb = afri.nb, plot = F) + g32 <- s.value(afri.ms$li, afri.ms$li[, 3], plot = F) + g33 <- s.value(afri.ms$li, afri.ms$li[, 4], plot = F) + g34 <- s.value(afri.ms$li, afri.ms$li[, 5], plot = F) + G3 <- ADEgS(list(g31, g32, g33, g34), layout = c(2, 2)) + + } else { + par(mfrow = c(3, 1)) + barplot(afri.ms$li[, 1]) + barplot(afri.ms$li[, 2]) + barplot(afri.ms$li[, 3]) + + par(mfrow = c(2, 2)) + s.label(afri.ms$li, clab = 0.75, cpoi = 0, neig = afri.neig, cneig = 1.5) + s.value(afri.ms$li, afri.ms$li[, 3]) + s.value(afri.ms$li, afri.ms$li[, 4]) + s.value(afri.ms$li, afri.ms$li[, 5]) + } + summary(afri.ms) + } Loading required namespace: spdep Failed with error: 'unused argument (quiet = TRUE)' > > par(mfrow = c(1, 1)) > plot(hclust(afri.dist, "ward.D"), h = -0.2) Error in hclust(afri.dist, "ward.D") : invalid clustering method Calls: plot -> hclust Execution halted