* using log directory 'd:/Rcompile/CRANpkg/local/2.11/stabledist.Rcheck' * using R version 2.11.1 Patched (2010-07-29 r52657) * using session charset: ISO8859-1 * checking for file 'stabledist/DESCRIPTION' ... OK * this is package 'stabledist' version '0.6-2.1' * checking package name space information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking whether package 'stabledist' can be installed ... OK * checking package directory ... OK * checking for portable file names ... OK * checking DESCRIPTION meta-information ... OK * checking top-level 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 * 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 name space can be loaded with stated dependencies ... OK * checking whether the name space can be unloaded cleanly ... OK * checking for unstated 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 examples ... ERROR Running examples in 'stabledist-Ex.R' failed. The error most likely occurred in: > ### * dist-stable > > flush(stderr()); flush(stdout()) > > ### Name: StableDistribution > ### Title: Stable Distribution Function > ### Aliases: StableDistribution dstable pstable qstable rstable > ### Keywords: distribution > > ### ** Examples > > ## stable - > > ## Plot stable random number series > set.seed(1953) > r <- rstable(n = 1000, alpha = 1.9, beta = 0.3) > plot(r, type = "l", main = "stable: alpha=1.9 beta=0.3", + col = "steelblue") > grid() > > ## Plot empirical density and compare with true density: > hist(r, n = 25, probability = TRUE, border = "white", + col = "steelblue") > x <- seq(-5, 5, 0.25) > lines(x, dstable(x, alpha = 1.9, beta = 0.3, tol= 1e-3), lwd = 2) > > ## Plot df and compare with true df: > plot(ecdf(r), do.points=TRUE, col = "steelblue", + main = "Probabilities: ecdf(rstable(1000,..)) and true cdf F()") > rug(r) > lines(x, pstable(q = x, alpha = 1.9, beta = 0.3), + col="#0000FF88", lwd= 2.5) Warning in plot.xy(xy.coords(x, y), type = type, ...) : semi-transparency is not supported on this device: reported only once per page > > ## Switching sign(beta) <==> Mirror the distribution around x == delta: > curve(dstable(x, alpha=1.2, beta = .8, gamma = 3, delta = 2), -10, 10) > curve(dstable(x, alpha=1.2, beta = -.8, gamma = 3, delta = 2), + add=TRUE, col=2) > ## or the same > curve(dstable(2*2-x, alpha=1.2, beta = +.8, gamma = 3, delta = 2), + add=TRUE, col=adjustcolor("gray",0.2), lwd=5) Error in plot.xy(xy.coords(x, y), type = type, ...) : could not find function "adjustcolor" Calls: curve -> lines -> lines.default -> plot.xy Execution halted