Running ‘LmME.R’
  Running ‘Resp.R’
  Running ‘SurvregME.R’
  Running ‘basics.R’
  Running ‘methods.R’ [11s/11s]
  Running ‘predict.R’
  Running ‘simulate.R’
  Running ‘smooth.R’
  Running ‘test_util.R’
Running the tests in ‘tests/LmME.R’ failed.
Complete output:
  > ## -- Test utils & settings
  > source("test_util.R")
  > .run_test <- identical(Sys.getenv("NOT_CRAN"), "true")
  > oldopt <- options(digits = 4)
  > set.seed(100)
  > 
  > library("tramME")
  Loading required package: tram
  Loading required package: mlt
  Loading required package: basefun
  Loading required package: variables
  Loading required package: mvtnorm
  > library("tram")
  > library("lme4")
  Loading required package: Matrix
  > gamdat <- mgcv::gamSim(6, n = 500, scale = 2, verbose = FALSE)
  Gu & Wahba 4 term additive model
  > 
  > ## -- Fixed effects only model
  > m01 <- LmME(Reaction ~ Days, data = sleepstudy, fixed = c("Days" = 0.6))
  > m02 <- Lm(Reaction ~ Days, data = sleepstudy, fixed = c("Days" = 0.6))
  > stopifnot(m01$opt$convergence == 0)
  > stopifnot(m02$convergence == 0)
  > chkeq(logLik(m01), logLik(m02), check.attributes = FALSE)
  > chkeq(coef(m01, with_baseline = TRUE), coef(m02, with_baseline = TRUE), tol = 1e-5)
  > vc1 <- vcov(m01, pargroup = "all")
  > vc2 <- vcov(m01, pargroup = "all", method = "analytical")
  > chkeq(vc1, vcov(m02, with_baseline = TRUE), tol = 1e-3)
  > chkeq(vc2, vcov(m02, with_baseline = TRUE), tol = 1e-5)
  > 
  > ## -- Compare with lmer
  > m1 <- LmME(Reaction ~ Days + (Days | Subject), data = sleepstudy)
  > m2 <- lmer(Reaction ~ Days + (Days | Subject), data = sleepstudy, REML = FALSE)
  > stopifnot(m1$opt$convergence == 0)
  > 
  > ## logLik, fixed effects, sigma
  > chkeq(logLik(m1), logLik(m2), check.attributes = FALSE)
  > chkeq(fixef(m2), coef(m1, as.lm = TRUE), tol = 1e-6)
  > chkeq(sigma(m1), sigma(m2), tol = 1e-5)
  > 
  > ## --- SEs of fixed effects
  > vc1 <- vcov(m1, as.lm = TRUE, pargroup = "fixef")
  > vc2 <- vcov(m2)
  > chkeq(sqrt(diag(vc1)), sqrt(diag(vc2)), tol = 1e-4, check.attributes = FALSE)
  > 
  > ## --- Variances and correlations of the random effects
  > vc1 <- VarCorr(m1, as.lm = TRUE)
  > vc2 <- lme4::VarCorr(m2)
  Error in tcrossprod(sc * Li) : "tcrossprod" is not a BUILTIN function
  Calls: <Anonymous> ... VarCorr.merMod -> structure -> mkVarCorr -> lapply -> FUN
  Execution halted