Package: sparseGAM Check: examples New result: ERROR Running examples in ‘sparseGAM-Ex.R’ failed The error most likely occurred in: > base::assign(".ptime", proc.time(), pos = "CheckExEnv") > ### Name: SBGAM > ### Title: Sparse Bayesian Generalized Additive Models > ### Aliases: SBGAM > > ### ** Examples > > ## Generate data > set.seed(12345) > X = matrix(runif(100*5), nrow=100) > n = dim(X)[1] > y = 3*sin(2*pi*X[,1])-3*cos(2*pi*X[,2]) + rnorm(n) > > ## Test data with 30 observations > X.test = matrix(runif(30*5), nrow=30) > > ## Fit sparse Bayesian generalized additive model to data with the SSGL penalty > ## and 5 spike hyperparameters > SBGAM.mod = SBGAM(y, X, X.test, family="gaussian", lambda0=seq(from=50,to=10,by=-10)) lambda0 = 50 Error in loss[l] <- EM_output$loss : replacement has length zero Calls: SBGAM -> SSGL Execution halted