CRAN Package Check Results for Package dlmodeler

Last updated on 2018-04-22 23:50:06 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.4-2 2.30 22.97 25.27 ERROR
r-devel-linux-x86_64-debian-gcc 1.4-2 2.34 19.95 22.29 ERROR
r-devel-linux-x86_64-fedora-clang 1.4-2 331.92 NOTE
r-devel-linux-x86_64-fedora-gcc 1.4-2 322.03 NOTE
r-devel-windows-ix86+x86_64 1.4-2 6.00 263.00 269.00 NOTE
r-devel-osx-x86_64 1.4-2 NOTE
r-patched-linux-x86_64 1.4-2 2.25 24.55 26.80 ERROR
r-patched-solaris-x86 1.4-2 383.80 NOTE
r-release-linux-x86_64 1.4-2 1.23 306.09 307.32 NOTE
r-release-windows-ix86+x86_64 1.4-2 3.00 369.00 372.00 NOTE
r-release-osx-x86_64 1.4-2 NOTE
r-oldrel-windows-ix86+x86_64 1.4-2 4.00 269.00 273.00 NOTE

Check Details

Version: 1.4-2
Check: package dependencies
Result: NOTE
    Package suggested but not available for checking: ‘FKF’
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-osx-x86_64, r-patched-linux-x86_64, r-patched-solaris-x86, r-release-linux-x86_64

Version: 1.4-2
Check: dependencies in R code
Result: NOTE
    'library' or 'require' calls in package code:
     ‘FKF’ ‘dlm’
     Please use :: or requireNamespace() instead.
     See section 'Suggested packages' in the 'Writing R Extensions' manual.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-ix86+x86_64, r-devel-osx-x86_64, r-patched-linux-x86_64, r-patched-solaris-x86, r-release-linux-x86_64, r-release-windows-ix86+x86_64, r-release-osx-x86_64, r-oldrel-windows-ix86+x86_64

Version: 1.4-2
Check: S3 generic/method consistency
Result: NOTE
    Found the following apparent S3 methods exported but not registered:
     %%.dlmodeler *.dlmodeler +.dlmodeler
    See section ‘Registering S3 methods’ in the ‘Writing R Extensions’
    manual.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-patched-linux-x86_64, r-patched-solaris-x86, r-release-linux-x86_64

Version: 1.4-2
Check: R code for possible problems
Result: NOTE
    dlmodeler.extract: no visible global function definition for ‘qnorm’
    dlmodeler.fit.MAD: no visible global function definition for ‘optim’
    dlmodeler.fit.MAPE: no visible global function definition for ‘optim’
    dlmodeler.fit.MLE: no visible global function definition for ‘optim’
    dlmodeler.fit.MSE: no visible global function definition for ‘optim’
    dlmodeler.fit.sigma : fit.fun: no visible global function definition
     for ‘var’
    dlmodeler.fit.sigma: no visible global function definition for ‘optim’
    dlmodeler.forecast: no visible global function definition for ‘qnorm’
    Undefined global functions or variables:
     optim qnorm var
    Consider adding
     importFrom("stats", "optim", "qnorm", "var")
    to your NAMESPACE file.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-ix86+x86_64, r-devel-osx-x86_64, r-patched-linux-x86_64, r-patched-solaris-x86, r-release-linux-x86_64, r-release-windows-ix86+x86_64, r-release-osx-x86_64, r-oldrel-windows-ix86+x86_64

Version: 1.4-2
Check: examples
Result: ERROR
    Running examples in ‘dlmodeler-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: dlmodeler.forecast
    > ### Title: Forecast function
    > ### Aliases: dlmodeler.forecast
    > ### Keywords: dlm kalman forecast
    >
    > ### ** Examples
    >
    > require(dlmodeler)
    >
    > # generate some quarterly data
    > n <- 80
    > level <- 12
    > sigma <- .75
    > season <- c(5,6,8,2)
    > y <- level + 3*sin((1:n)/10) + rep(season,n/4) + rnorm(n, 0, sigma)
    > y <- matrix(y,nrow=1)
    >
    > # fit a stochastic level + quarterly seasonal model to the data by
    > # maximum likelihood estimation
    > build.fun <- function(p) {
    + sigmaH <- exp(p[1])
    + sigmaQ <- exp(p[2])*sigmaH
    + mod <- dlmodeler.build.polynomial(0,sigmaH=sigmaH,sigmaQ=sigmaQ) +
    + dlmodeler.build.dseasonal(4,sigmaH=0)
    + return(mod)
    + }
    > fit <- dlmodeler.fit.MLE(y, build.fun, c(0,0))
    Error in dlmodeler.build.polynomial(0, sigmaH = sigmaH, sigmaQ = sigmaQ) + :
     non-numeric argument to binary operator
    Calls: dlmodeler.fit.MLE ... optim -> <Anonymous> -> fn -> dlmodeler.filter -> build.fun
    Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64

Version: 1.4-2
Check: tests
Result: ERROR
     Running ‘tests.R’ [0s/0s]
    Running the tests in ‘tests/tests.R’ failed.
    Complete output:
     >
     > require(dlmodeler)
     Loading required package: dlmodeler
     >
     > ####################
     > # tests for 'core' #
     > ####################
     >
     > # create a DLM by specifying its vectors and matrices
     > # check if the model is valid
     > mod <- dlmodeler.build(
     + a0 = c(0,0), # initial state: (level, trend)
     + P0 = diag(c(0,0)), # initial state variance set to...
     + P0inf = diag(2), # ...use exact diffuse initialization
     + matrix(c(1,0,1,1),2,2), # state transition matrix
     + diag(c(1,1)), # state disturbance selection matrix
     + diag(c(.5,.05)), # state disturbance variance matrix
     + matrix(c(1,0),1,2), # observation design matrix
     + matrix(1,1,1) # observation disturbance variance matrix
     + )
     >
     > print(mod)
     constant dlmodel(state dim=2, dist dim=2, obs dim=1) 'noname'
     - model has 1 component: noname
     > if(!(dlmodeler.check(mod)$status==TRUE)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$m==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$r==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$d==1)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$timevar==FALSE)) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Tt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Rt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Qt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Zt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Ht))) stop("unit test failed")
     >
     >
     > # an empty DLM with 4 state variables (3 of which are stochastic)
     > # and bi-variate observations, check if the model is valid
     > mod <- dlmodeler.build(dimensions=c(4,3,2))
     >
     > print(mod)
     constant dlmodel(state dim=4, dist dim=3, obs dim=2) 'noname'
     - model has 1 component: noname
     > if(!(dlmodeler.check(mod)$status==TRUE)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$m==4)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$r==3)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$d==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$timevar==FALSE)) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Tt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Rt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Qt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Zt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Ht))) stop("unit test failed")
     >
     >
     > # operations on matrices
     > v1 <- matrix(1:9,nrow=3,ncol=3)
     > v2 <- array(1:18,dim=c(3,3,2))
     >
     > m1 <- dlmodeler:::dlmodeler.timevar.fun(v1,v1,function(x,y) x+y)
     > if(!(sum(abs(m1-v1-v1))==0)) stop("unit test failed")
     > m21 <- dlmodeler:::dlmodeler.timevar.fun(v2,v1,function(x,y) x+y)
     > if(!(sum(abs(m21[,,1]-v1-v1))==0)) stop("unit test failed")
     > if(!(sum(abs(m21[,,2]-v1-v1-9))==0)) stop("unit test failed")
     > m22 <- dlmodeler:::dlmodeler.timevar.fun(v1,v2,function(x,y) x+y)
     > if(!(sum(abs(m22[,,1]-m21[,,1]))==0)) stop("unit test failed")
     > if(!(sum(abs(m22[,,2]-m21[,,2]))==0)) stop("unit test failed")
     > m3 <- dlmodeler:::dlmodeler.timevar.fun(v2,v1,function(x,y) x+y)
     > if(!(sum(abs(m3[,,1]-v1-v1))==0)) stop("unit test failed")
     > if(!(sum(abs(m3[,,2]-v1-matrix(10:18,nrow=3,ncol=3)))==0)) stop("unit test failed")
     >
     > mt <- matrix(c(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,9,9,9,0,0,0,9,9,9,0,0,0,9,9,9),nrow=6,ncol=6)
     > md <- dlmodeler:::dlmodeler.timevar.fun(v1,v2,dlmodeler:::dlmodeler.bdiag)
     > if(!(sum(abs(md[,,2]-md[,,1]-mt))==0)) stop("unit test failed")
     >
     > # operators
     > m1 <- dlmodeler.build.dseasonal(12)
     > m2 <- dlmodeler.build.polynomial(0)
     > m3 <- dlmodeler.build.dseasonal(5)
     > m4 <- dlmodeler.build.constant(4)
     >
     > m1+m2+m3
     Error in m1 + m2 : non-numeric argument to binary operator
     Execution halted
Flavor: r-devel-linux-x86_64-debian-clang

Version: 1.4-2
Check: tests
Result: ERROR
     Running ‘tests.R’ [0s/1s]
    Running the tests in ‘tests/tests.R’ failed.
    Complete output:
     >
     > require(dlmodeler)
     Loading required package: dlmodeler
     >
     > ####################
     > # tests for 'core' #
     > ####################
     >
     > # create a DLM by specifying its vectors and matrices
     > # check if the model is valid
     > mod <- dlmodeler.build(
     + a0 = c(0,0), # initial state: (level, trend)
     + P0 = diag(c(0,0)), # initial state variance set to...
     + P0inf = diag(2), # ...use exact diffuse initialization
     + matrix(c(1,0,1,1),2,2), # state transition matrix
     + diag(c(1,1)), # state disturbance selection matrix
     + diag(c(.5,.05)), # state disturbance variance matrix
     + matrix(c(1,0),1,2), # observation design matrix
     + matrix(1,1,1) # observation disturbance variance matrix
     + )
     >
     > print(mod)
     constant dlmodel(state dim=2, dist dim=2, obs dim=1) 'noname'
     - model has 1 component: noname
     > if(!(dlmodeler.check(mod)$status==TRUE)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$m==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$r==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$d==1)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$timevar==FALSE)) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Tt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Rt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Qt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Zt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Ht))) stop("unit test failed")
     >
     >
     > # an empty DLM with 4 state variables (3 of which are stochastic)
     > # and bi-variate observations, check if the model is valid
     > mod <- dlmodeler.build(dimensions=c(4,3,2))
     >
     > print(mod)
     constant dlmodel(state dim=4, dist dim=3, obs dim=2) 'noname'
     - model has 1 component: noname
     > if(!(dlmodeler.check(mod)$status==TRUE)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$m==4)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$r==3)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$d==2)) stop("unit test failed")
     > if(!(dlmodeler.check(mod)$timevar==FALSE)) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Tt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Rt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Qt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Zt))) stop("unit test failed")
     > if(!(is.na(dlmodeler.check(mod)$timevar.Ht))) stop("unit test failed")
     >
     >
     > # operations on matrices
     > v1 <- matrix(1:9,nrow=3,ncol=3)
     > v2 <- array(1:18,dim=c(3,3,2))
     >
     > m1 <- dlmodeler:::dlmodeler.timevar.fun(v1,v1,function(x,y) x+y)
     > if(!(sum(abs(m1-v1-v1))==0)) stop("unit test failed")
     > m21 <- dlmodeler:::dlmodeler.timevar.fun(v2,v1,function(x,y) x+y)
     > if(!(sum(abs(m21[,,1]-v1-v1))==0)) stop("unit test failed")
     > if(!(sum(abs(m21[,,2]-v1-v1-9))==0)) stop("unit test failed")
     > m22 <- dlmodeler:::dlmodeler.timevar.fun(v1,v2,function(x,y) x+y)
     > if(!(sum(abs(m22[,,1]-m21[,,1]))==0)) stop("unit test failed")
     > if(!(sum(abs(m22[,,2]-m21[,,2]))==0)) stop("unit test failed")
     > m3 <- dlmodeler:::dlmodeler.timevar.fun(v2,v1,function(x,y) x+y)
     > if(!(sum(abs(m3[,,1]-v1-v1))==0)) stop("unit test failed")
     > if(!(sum(abs(m3[,,2]-v1-matrix(10:18,nrow=3,ncol=3)))==0)) stop("unit test failed")
     >
     > mt <- matrix(c(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,9,9,9,0,0,0,9,9,9,0,0,0,9,9,9),nrow=6,ncol=6)
     > md <- dlmodeler:::dlmodeler.timevar.fun(v1,v2,dlmodeler:::dlmodeler.bdiag)
     > if(!(sum(abs(md[,,2]-md[,,1]-mt))==0)) stop("unit test failed")
     >
     > # operators
     > m1 <- dlmodeler.build.dseasonal(12)
     > m2 <- dlmodeler.build.polynomial(0)
     > m3 <- dlmodeler.build.dseasonal(5)
     > m4 <- dlmodeler.build.constant(4)
     >
     > m1+m2+m3
     Error in m1 + m2 : non-numeric argument to binary operator
     Execution halted
Flavors: r-devel-linux-x86_64-debian-gcc, r-patched-linux-x86_64