* using log directory 'd:/Rcompile/CRANpkg/local/4.3/fdaconcur.Rcheck'
* using R version 4.3.3 (2024-02-29 ucrt)
* using platform: x86_64-w64-mingw32 (64-bit)
* R was compiled by
    gcc.exe (GCC) 12.3.0
    GNU Fortran (GCC) 12.3.0
* running under: Windows Server 2022 x64 (build 20348)
* using session charset: UTF-8
* checking for file 'fdaconcur/DESCRIPTION' ... OK
* checking extension type ... Package
* this is package 'fdaconcur' version '0.1.2'
* 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 'fdaconcur' can be installed ... OK
* checking installed package size ... OK
* 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 R files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... [0s] OK
* checking whether the package can be loaded with stated dependencies ... [0s] OK
* checking whether the package can be unloaded cleanly ... [0s] OK
* checking whether the namespace can be loaded with stated dependencies ... [0s] OK
* checking whether the namespace can be unloaded cleanly ... [0s] OK
* checking loading without being on the library search path ... [0s] OK
* checking use of S3 registration ... OK
* checking dependencies in R code ... WARNING
Missing or unexported object: 'fdapace::FLM1'
Unexported object imported by a ':::' call: 'fdapace:::interp2lin'
  See the note in ?`:::` about the use of this operator.
* checking S3 generic/method consistency ... OK
* checking replacement functions ... OK
* checking foreign function calls ... OK
* checking R code for possible problems ... [7s] 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 examples ... [13s] ERROR
Running examples in 'fdaconcur-Ex.R' failed
The error most likely occurred in:

> ### Name: historyIndexDense
> ### Title: Functional History Index Model
> ### Aliases: historyIndexDense
> 
> ### ** Examples
> 
> set.seed(1)
> ### functional covariate X(t) ###
> phi1 <- function(t) sin(pi*t / 5) / sqrt(5)
> phi2 <- function(t) cos(pi*t / 5) / sqrt(5)
> lambdaX <- c(10, 5)
> n <- 150
> N <- 101
> Xi <- matrix(rnorm(2*n), nrow = n, ncol = 2)
> denseLt <- list()
> denseLy <- list()
> t0 <- seq(0, 15, length.out = N)
> for (i in 1:n) {
+   denseLt[[i]] <- t0
+   denseLy[[i]] <- lambdaX[1]*Xi[i, 1]*phi1(t0) + lambdaX[2]*Xi[i, 2]*phi2(t0)
+ }
> denseX0 <- list(Ly = denseLy, Lt = denseLt)
> 
> ### generate coefficient function gamma(u), beta(u) ###
> Lag <- 5
> u0 <- t0[t0<=Lag]
> t0_out <- t0[t0>=Lag]
> gamma_u <- function(u) sqrt(2/5) * cos(pi * u /5)
> beta_1 <- function(t) 5*sin(pi*t/10)
> beta_0 <- function(t) t^2/2
> 
> ### functional response Y(t), t in t0_out ### 
> denseLt <- list()
> denseLy <- list()
> for (i in 1:n) {
+   denseLt[[i]] <- t0_out
+   Xt <- denseX0$Ly[[i]]
+   Xtu <- t(sapply((1:N)[t0>=Lag], function(j){
+     rev(Xt[(j-length(u0)+1):j])  #history index for X[t-u:t]
+   }))
+   IntGammaXtu <- apply(Xtu, 1, function(v){
+     fdapace::trapzRcpp(u0, gamma_u(u0) * v)
+   })
+   #append 0 in the first length(u0)-1 element(useless info. in our modeling)
+   denseLy[[i]] <- beta_0(t0_out) + IntGammaXtu * beta_1(t0_out) + rnorm(length(t0_out), 0, 0.1) 
+ }
> denseY <- list(Ly = denseLy, Lt = denseLt)
> 
> ### functional predictor X(t) (adjust for t0_out) ###
> denseLt <- list()
> denseLy <- list()
> for (i in 1:n){
+   denseLt[[i]] <- t0_out
+   denseLy[[i]] <- denseX0$Ly[[i]][t0>=Lag]
+ }
> denseX <- list(Ly = denseLy,
+                Lt = denseLt)
> fit <- historyIndexDense(Y = denseY, X = list(X = denseX), Lag = Lag)
Error: 'FLM1' is not an exported object from 'namespace:fdapace'
Execution halted
* checking PDF version of manual ... [16s] OK
* checking HTML version of manual ... [2s] OK
* DONE
Status: 1 ERROR, 1 WARNING