I am trying to do a lasso variable selection on my classical and Bayesian models but none of them is working and it crashes my whole program.
My data are:
https://i.stack.imgur.com/wFTRV.png
My models are:
# Classical model
model1 <- lm(V128~., data=subset)
# Bayesian model
model2 <- bas.lm(V128s ~ . , data = subset, method="MCMC", prior = "ZS-null", modelprior = uniform())
And the code I am using is:
# Lasso for classical model
lasso <- glmnet(subset[,-13], subset$V128, family="gaussian", alpha=1, lambda=NULL)
# build Lasso (variable selection)
blasso(subset, subset$V128 ,T = 1000, thin = NULL, RJ = TRUE, M = 12,
beta = NULL, lambda2 = 0, s2 = var(subset$V128-mean(subset$V128)),
case = c("default", "ridge", "hs", "ng"), mprior = c(0.5,0.5), rd = NULL,
ab = NULL, theta = 0, rao.s2 = TRUE, icept = TRUE,
normalize = TRUE, verb = 1)
What shall i do to make it work?