CRAN Package Check Results for Package RandomFields

Last updated on 2017-12-20 00:47:10 CET.

Additional issues

rchk

Check Details

Version: 3.1.50
Check: R code for possible problems
Result: NOTE
    Found the following calls to attach():
    File ‘RandomFields/R/RFfit.R’:
     attach(data, name = name)
    See section ‘Good practice’ in ‘?attach’.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64, r-release-linux-x86_64

Version: 3.1.50
Check: installed package size
Result: NOTE
     installed size is 6.4Mb
     sub-directories of 1Mb or more:
     help 1.1Mb
     libs 3.8Mb
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-ix86+x86_64, r-release-windows-ix86+x86_64, r-release-osx-x86_64, r-oldrel-windows-ix86+x86_64, r-oldrel-osx-x86_64

Version: 3.1.50
Check: examples
Result: ERROR
    Running examples in ‘RandomFields-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: RMave
    > ### Title: Space-time moving average model
    > ### Aliases: RMave
    > ### Keywords: spatial models
    >
    > ### ** Examples
    >
    > RFoptions(seed=0) ## *ANY* simulation will have the random seed 0; set
    > ## RFoptions(seed=NA) to make them all random again
    >
    > ## Example of an evaluation of the ave2-covariance function
    > ## in three different ways
    > ## ---------------------------------------------------------
    > ## some parameters A and z
    > A <- matrix(c(2,1,1,2),ncol=2)
    > z <- c(1,2)
    > ## h for evalutation
    > h <- c(1,2)
    > ## some abbreviations
    > E <- matrix(c(1,0,0,1),ncol=2)
    > B <- A %*% h %*% t(h) %*% A
    > phi <- function(t){return(RFcov(RMwhittle(1), t))}
    > ## ---------------------------------------------------------
    > ## the following should yield the same value 3 times
    > ## (also for other choices of A,z and h)
    > z1 <- RFcov( model=RMave(RMwhittle(1),A=A,z=z) , x=t(c(h,0)) )
    > z2 <- RFcov( model=RMave(RMwhittle(1),A=A,z=z,spacetime=FALSE) , x=t(h) )
    > z3 <- ( (det(E+2*B))^(-1/2) ) *
    + phi( sqrt( sum(h*h)/2 + (t(z) %*% h)^2 *
    + ( 1-2*t(h) %*% A %*% solve(E+2*B) %*% A %*% h) ) )
    > ##
    > stopifnot(abs(z1-z2)<1e-12, abs(z2-z3)<1e-12)
    Error: abs(z2 - z3) < 1e-12 is not TRUE
    Execution halted
Flavor: r-patched-solaris-x86