* using log directory 'd:/Rcompile/CRANpkg/local/4.5/epigrowthfit.Rcheck'
* using R Under development (unstable) (2024-06-21 r86808 ucrt)
* using platform: x86_64-w64-mingw32
* R was compiled by
    gcc.exe (GCC) 13.2.0
    GNU Fortran (GCC) 13.2.0
* running under: Windows Server 2022 x64 (build 20348)
* using session charset: UTF-8
* checking for file 'epigrowthfit/DESCRIPTION' ... OK
* this is package 'epigrowthfit' version '0.15.3'
* package encoding: UTF-8
* checking package namespace information ... OK
* checking package dependencies ... OK
* checking if this is a source package ... OK
* checking if there is a namespace ... OK
* checking for hidden files and directories ... OK
* checking for portable file names ... OK
* checking whether package 'epigrowthfit' can be installed ... OK
* used C++ compiler: 'g++.exe (GCC) 13.2.0'
* checking installed package size ... NOTE
  installed size is 14.2Mb
  sub-directories of 1Mb or more:
    libs  13.6Mb
* checking package directory ... OK
* checking DESCRIPTION meta-information ... OK
* checking top-level files ... OK
* checking for left-over files ... OK
* checking index information ... OK
* checking package subdirectories ... OK
* checking code files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... [2s] OK
* checking whether the package can be loaded with stated dependencies ... [1s] OK
* checking whether the package can be unloaded cleanly ... [2s] OK
* checking whether the namespace can be loaded with stated dependencies ... [2s] OK
* checking whether the namespace can be unloaded cleanly ... [2s] OK
* checking loading without being on the library search path ... [2s] OK
* checking whether startup messages can be suppressed ... [2s] OK
* checking use of S3 registration ... OK
* checking 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 ... [12s] OK
* checking Rd files ... [1s] 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 for unstated dependencies in examples ... OK
* checking contents of 'data' directory ... OK
* checking data for non-ASCII characters ... [0s] OK
* checking LazyData ... OK
* checking data for ASCII and uncompressed saves ... OK
* checking line endings in C/C++/Fortran sources/headers ... OK
* checking line endings in Makefiles ... OK
* checking compilation flags in Makevars ... OK
* checking for GNU extensions in Makefiles ... OK
* checking for portable use of $(BLAS_LIBS) and $(LAPACK_LIBS) ... OK
* checking use of PKG_*FLAGS in Makefiles ... OK
* checking pragmas in C/C++ headers and code ... OK
* checking compiled code ... OK
* checking examples ... [35s] OK
* checking for unstated dependencies in 'tests' ... OK
* checking tests ... [299s] ERROR
  Running 'coef.R' [5s]
  Running 'confint.R' [53s]
  Running 'datetime.R' [1s]
  Running 'egf.R' [5s]
  Running 'egf_enum.R' [2s]
  Running 'egf_eval.R' [2s]
  Running 'egf_examples_day_of_week.R' [2s]
  Running 'egf_examples_excess.R' [2s]
  Running 'egf_examples_fixed.R' [2s]
  Running 'egf_examples_random.R' [60s]
  Running 'egf_link.R' [2s]
  Running 'egf_misc.R' [6s]
  Running 'egf_options.R' [2s]
  Running 'egf_utils.R' [6s]
  Running 'epidemic.R' [2s]
  Running 'extract.R' [5s]
  Running 'fitted.R' [5s]
  Running 'gi.R' [2s]
  Running 'include.R' [87s]
  Running 'language.R' [1s]
  Running 'prior.R' [2s]
  Running 'profile.R' [37s]
  Running 'summary.R' [5s]
  Running 'utils.R' [2s]
  Running 'validity.R' [1s]
  Running 'zzz.R' [1s]
Running the tests in 'tests/include.R' failed.
Complete output:
  > library(epigrowthfit)
  > options(warn = 2L, error = if (interactive()) recover)
  > 
  > src <- "src"
  > src. <- system.file("tests", src, package = "epigrowthfit", mustWork = TRUE)
  > file.copy(c(src, src.), tempdir(), recursive = TRUE)
  [1] TRUE TRUE
  > setwd(file.path(tempdir(), src))
  > Sys.setenv(R_TESTS = "") # startup.Rs does not exist here
  > 
  > dll <- "test"
  > cpp <- paste0(dll, ".cpp")
  > TMB::compile(cpp)
  using C++ compiler: 'g++.exe (GCC) 13.2.0'
  make[1]: Entering directory '/d/temp/RtmpqKDOgp/src'
  g++ -std=gnu++17  -I"D:/RCompile/recent/R/include" -DNDEBUG -I"D:/RCompile/CRANpkg/lib/4.5/TMB/include" -I"D:/temp/Rtmp4cRvSl/RLIBS_186d848f759f7/RcppEigen/include"  -DTMB_SAFEBOUNDS -DTMB_EIGEN_DISABLE_WARNINGS -DLIB_UNLOAD=R_unload_test  -DTMB_LIB_INIT=R_init_test  -DCPPAD_FRAMEWORK    -I"d:/rtools44/x86_64-w64-mingw32.static.posix/include"     -pedantic -O2 -Wall  -mfpmath=sse -msse2 -mstackrealign  -c test.cpp -o test.o
  g++ -std=gnu++17 -shared -s -static-libgcc -o test.dll tmp.def test.o -Ld:/rtools44/x86_64-w64-mingw32.static.posix/lib/x64 -Ld:/rtools44/x86_64-w64-mingw32.static.posix/lib -LD:/RCompile/recent/R/bin/x64 -lR
  make[1]: Leaving directory '/d/temp/RtmpqKDOgp/src'
  make[1]: Entering directory '/d/temp/RtmpqKDOgp/src'
  make[1]: Leaving directory '/d/temp/RtmpqKDOgp/src'
  [1] 0
  > dyn.load(paste0(dll, .Platform[["dynlib.ext"]]))
  > 
  > getReport <- local({
  + 	tt <- readLines(cpp)
  + 	tt <- paste(tt, collapse = "\n")
  + 	tt <- chartr("\t\r\n", "   ", tt)
  + 	tt <- sub("^.*?enum +test *\\{(.*?)\\} *;.*$", "\\1", tt)
  + 	tt <- gsub(" ", "", tt)
  + 	enum. <- strsplit(tt, ",")[[1L]]
  + 
  + 	function(enum, ...)
  + 		TMB::MakeADFun(data = list(flag = match(enum, enum., 0L) - 1L, ...),
  + 		               parameters = list(),
  + 		               type = "Fun",
  + 		               checkParameterOrder = FALSE,
  + 		               DLL = dll)[["report"]]()[["ans"]]
  + })
  > 
  > mvlgamma <- function(x, p)
  +     0.25 * p * (p - 1) * log(pi) + rowSums(lgamma(outer(x, seq.int(0, by = 0.5, length.out = p), `-`)))
  > 
  > dlkj <- function(x, eta, log = FALSE) {
  + 	n <- 0.5 * (1 + sqrt(1 + 8 * length(x)))
  + 	R <- diag(n)
  + 	R[upper.tri(R)] <- x
  + 	log.ans <- (eta - 1) * (-sum(log(colSums(R * R))))
  + 	if (log) log.ans else exp(log.ans)
  + }
  > 
  > dwishart <- function(x, df, scale, log = FALSE) {
  + 	n <- 0.5 * (-1 + sqrt(1 + 8 * length(x)))
  + 	X <- theta2cov(x)
  + 	S <- theta2cov(scale)
  + 	log.ans <- -0.5 * (df * log(det(S)) + (-df + n + 1) * log(det(X)) + n * df * log(2) + 2 * mvlgamma(0.5 * df, n) + sum(diag(solve(S, X))))
  + 	if (log) log.ans else exp(log.ans)
  + }
  > 
  > dinvwishart <- function(x, df, scale, log = FALSE) {
  + 	n <- 0.5 * (-1 + sqrt(1 + 8 * length(x)))
  + 	X <- theta2cov(x)
  + 	S <- theta2cov(scale)
  + 	log.ans <- -0.5 * (-df * log(det(S)) + (df + n + 1) * log(det(X)) + n * df * log(2) + 2 * mvlgamma(0.5 * df, n) + sum(diag(solve(X, S))))
  + 	if (log) log.ans else exp(log.ans)
  + }
  > 
  > 
  > ## list_of_vectors_t
  > x <- list(rnorm(10L), seq_len(5L), TRUE, double(0L))
  > ans <- getReport("list_of_vectors_t", x = x)
  Error in isNullPointer(ADFun$ptr) : 
    R_ExternalPtrAddr: argument of type NILSXP is not an external pointer
  Calls: getReport -> <Anonymous> -> f -> isNullPointer
  Execution halted
* checking PDF version of manual ... [21s] OK
* checking HTML version of manual ... [9s] OK
* DONE
Status: 1 ERROR, 1 NOTE