- using R version 4.4.0 Under development (unstable) (2006-00-00 ucrt)
- using platform: x86_64-w64-mingw32
- 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 'UMR/DESCRIPTION' ... OK
- this is package 'UMR' version '1.1.0'
- 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 'UMR' can be installed ... OK
See the install log for details.
- 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 ... [1s] OK
- checking whether the package can be loaded with stated dependencies ... [1s] OK
- checking whether the package can be unloaded cleanly ... [1s] OK
- checking whether the namespace can be loaded with stated dependencies ... [1s] OK
- checking whether the namespace can be unloaded cleanly ... [1s] OK
- checking loading without being on the library search path ... [1s] 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 ... [5s] 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 ... [6s] ERROR
Running examples in 'UMR-Ex.R' failed
The error most likely occurred in:
> ### Name: UMRgradDesc
> ### Title: Basic gradient descent implementation
> ### Aliases: UMRgradDesc gradDesc
>
> ### ** Examples
>
>
>
> #### Set up the gradient function
> mysig <- 1 ## std dev
> errdist <- distr::Norm(0, sd=mysig)
> modeldistname <- truedistname <- "Gauss" ## used for savefile name
> mm0 <- function(xx){xx}
> nn <- 300
> xx <- sort(runif(n=nn, 0, 7))
> yy <- mm0(xx) + errdist@r(nn)
> ## plot(xx,yy)
>
> myScale <- mysig
>
> AAfunc_Gauss <- purrr::partial(AAfunc_Gauss_generic, sig=!!mysig)
> AA_Gauss <- purrr::partial(AA, func=!!AAfunc_Gauss)
> BBfunc_Gauss <- purrr::partial(BBfunc_Gauss_generic, sig=!!mysig)
> BB_Gauss <- purrr::partial(BB, func=!!BBfunc_Gauss)
> mygradSIR <-
+ grad_SIR_Gauss <- ## just for ease of reference
+ purrr::partial(grad_SIR_generic,
+ rescale=TRUE, ## factor of nn/2
+ AAfunc=!!AA_Gauss, BBfunc=!!BB_Gauss)
>
> ## Now run the gradient descent
> savefilenameUnique <- paste("graddesc_", modeldistname, "_", truedistname,
+ "_n", nn,
+ "_", format(Sys.time(), "%Y-%m-%d-%T"), ".rsav", sep="")
> print(paste("The unique save file name for this run is", savefilenameUnique))
[1] "The unique save file name for this run is graddesc_Gauss_Gauss_n300_2023-10-16-09:13:31.rsav"
> stepsize <- nn^(1/2) ## Has to be tuned
> MM <- 100 ## Total number iterations is MM * JJ
> JJ <- 2
> eps <- (max(yy)-min(yy)) / (1000 * nn^(1/5) * myScale)
> ## print *and* SAVE every 'printevery' iterations.
> ## here no save occurs, printevery > MM
> printevery <- 1000
> init <- yy
>
> mmhat <- UMRgradDesc(yy=yy, grad=mygradSIR, ## from settings file
+ init=init,
+ stepsize=stepsize, MM=MM,
+ printevery=printevery,
+ filename=paste0("../saves/", savefilenameUnique))
> #### some classical/matched [oracle] estimators
> isoreg_std <- Iso::ufit(y=yy, x=xx, lmode=Inf)
Error in Iso::ufit(y = yy, x = xx, lmode = Inf) :
If "lmode" is specified, it must be an entry
of "x" which defaults to seq(0,1,length=length(y)).
Execution halted
- checking PDF version of manual ... [21s] OK
- checking HTML version of manual ... [3s] OK
- DONE
Status: 1 ERROR