Running 'bugfixes.R' [6s]
  Running 'regtest-families.R' [14s]
  Running 'regtest-gamboostLSS.R' [12s]
  Running 'regtest-glmboostLSS.R' [0s]
  Running 'regtest-mstop.R' [0s]
  Running 'regtest-noncyclic_fitting.R' [0s]
  Running 'regtest-stabilization.R' [0s]
  Running 'regtest-stabsel.R' [0s]
Running the tests in 'tests/regtest-glmboostLSS.R' failed.
Complete output:
  > ###
  > # check glmboostLSS()
  > 
  > require("gamboostLSS")
  Loading required package: gamboostLSS
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamboostLSS'
  > require("gamlss")
  Loading required package: gamlss
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamlss'
  > 
  > set.seed(1907)
  > n <- 5000
  > x1  <- runif(n)
  > x2 <- runif(n)
  > mu <- 2 -1*x1 - 3*x2
  > sigma <- exp(-1*x1 + 3*x2)
  > df <- exp(1 + 3*x1 + 1*x2)
  > y <- rTF(n = n, mu = mu, sigma = sigma, nu = df)
  Error in rTF(n = n, mu = mu, sigma = sigma, nu = df) : 
    could not find function "rTF"
  Execution halted
Running the tests in 'tests/regtest-mstop.R' failed.
Complete output:
  > ###
  > # test functionality of multivariate mstop
  > 
  > #detach("package:gamboostLSS", unload = TRUE)
  > require(gamboostLSS)
  Loading required package: gamboostLSS
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamboostLSS'
  > 
  > ### create some data first
  > set.seed(1907)
  > x1 <- rnorm(1000)
  > x2 <- rnorm(1000)
  > x3 <- rnorm(1000)
  > x4 <- rnorm(1000)
  > x5 <- rnorm(1000)
  > x6 <- rnorm(1000)
  > mu    <- exp(1.5 +1 * x1 +0.5 * x2 -0.5 * x3 -1 * x4)
  > sigma <- exp(-0.4 * x3 -0.2 * x4 +0.2 * x5 +0.4 * x6)
  > y <- numeric(1000)
  > for( i in 1:1000)
  +     y[i] <- rnbinom(1, size = sigma[i], mu = mu[i])
  > dat <- data.frame(x1, x2, x3, x4, x5, x6, y)
  > 
  > 
  > ## check if model with different mstops is what we expect
  > model <- glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat,
  +                      control = boost_control(mstop = 10),
  +                      center = TRUE)
  Error in glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat, control = boost_control(mstop = 10),  : 
    could not find function "glmboostLSS"
  Execution halted
Running the tests in 'tests/regtest-noncyclic_fitting.R' failed.
Complete output:
  > require("gamboostLSS")
  Loading required package: gamboostLSS
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamboostLSS'
  > 
  > ###negbin dist, linear###
  > 
  > set.seed(2611)
  > x1 <- rnorm(1000)
  > x2 <- rnorm(1000)
  > x3 <- rnorm(1000)
  > x4 <- rnorm(1000)
  > x5 <- rnorm(1000)
  > x6 <- rnorm(1000)
  > mu    <- exp(1.5 + x1^2 +0.5 * x2 - 3 * sin(x3) -1 * x4)
  > sigma <- exp(-0.2 * x4 +0.2 * x5 +0.4 * x6)
  > y <- numeric(1000)
  > for (i in 1:1000)
  +   y[i] <- rnbinom(1, size = sigma[i], mu = mu[i])
  > dat <- data.frame(x1, x2, x3, x4, x5, x6, y)
  > 
  > #fit models at number of params + 1
  > 
  > #glmboost
  > model <- glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat,
  +                      control = boost_control(mstop = 3), method = "noncyclic")
  Error in glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat, control = boost_control(mstop = 3),  : 
    could not find function "glmboostLSS"
  Execution halted
Running the tests in 'tests/regtest-stabilization.R' failed.
Complete output:
  > ###
  > # test functionality of stabilization
  > 
  > require("gamboostLSS")
  Loading required package: gamboostLSS
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamboostLSS'
  > 
  > ## simulate Gaussian data
  > set.seed(0804)
  > x1 <- runif(1000)
  > x2 <- runif(1000)
  > x3 <- runif(1000)
  > x4 <- runif(1000)
  > mu    <- 1.5 +1 * x1 +4 * x2
  > sigma <- exp(1 - 0.2 * x3 -0.4 * x4)
  > y <- rnorm(mean = mu, sd = sigma, n = length(mu))
  > dat <- data.frame(x1, x2, x3, x4, y)
  > 
  > ## do not use stabilization
  > m1 <- glmboostLSS(y ~ x1 + x2 + x3 + x4,
  +                   families=GaussianLSS(),
  +                   data=dat)
  Error in glmboostLSS(y ~ x1 + x2 + x3 + x4, families = GaussianLSS(),  : 
    could not find function "glmboostLSS"
  Execution halted
Running the tests in 'tests/regtest-stabsel.R' failed.
Complete output:
  > require("gamboostLSS")
  Loading required package: gamboostLSS
  Warning message:
  In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
    there is no package called 'gamboostLSS'
  > ### Data generating process:
  > set.seed(1907)
  > x1 <- rnorm(500)
  > x2 <- rnorm(500)
  > x3 <- rnorm(500)
  > x4 <- rnorm(500)
  > x5 <- rnorm(500)
  > x6 <- rnorm(500)
  > mu    <- exp(1.5 +1 * x1 +0.5 * x2 -0.5 * x3 -1 * x4)
  > sigma <- exp(-0.4 * x3 -0.2 * x4 +0.2 * x5 +0.4 * x6)
  > y <- numeric(500)
  > for( i in 1:500)
  +     y[i] <- rnbinom(1, size = sigma[i], mu = mu[i])
  > dat <- data.frame(x1, x2, x3, x4, x5, x6, y)
  > 
  > model <- glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat,
  +                      control = boost_control(mstop = 10),
  +                      center = TRUE, method = "cyclic")
  Error in glmboostLSS(y ~ ., families = NBinomialLSS(), data = dat, control = boost_control(mstop = 10),  : 
    could not find function "glmboostLSS"
  Execution halted