This is my code :
#Import libraries
library(ISLR)
library(glmnet)
library(dplyr)
library(tidyr)
#load data
mydata <- read.csv("data_lasso.csv")
options(max.print=999999)
#Data type flatten & extraction
y = mydata[,1]
x = mydata[,2:551]
y = as.numeric(unlist(y))
x = as.numeric(unlist(x))
x <- matrix(x, nrow = 3373, byrow = FALSE)
#Trace plot for LASSO
lasso_model = glmnet(x,y,alpha=1,lambda=c(0.0000000001,0.000000001,0.00000001,0.0000001,0.000001,0.00001,0.0001,0.001,0.01,0.1,1))
plot(lasso_model)
#2 Outputs in Excel
lasso_model = glmnet(x,y,alpha=1,lambda=c(0.1,0.05,0.01,0.005,0.001))
coef(lasso_model)
regression_model= glm(mydata$e_hat~.,data=mydata)
summary(regression_model)
This is error
lasso_model = glmnet(x,y,alpha=1,lambda=c(0.0000000001,0.000000001,0.00000001,0.0000001,0.000001,0.00001,0.0001,0.001,0.01,0.1,1))
Error in elnet(x, is.sparse, ix, jx, y, weights, offset, type.gaussian, :
NA/NaN/Inf in foreign function call (arg 5)
lasso_model = glmnet(x,y,alpha=1,lambda=c(0.1,0.05,0.01,0.005,0.001))
Error in elnet(x, is.sparse, ix, jx, y, weights, offset, type.gaussian, :
NA/NaN/Inf in foreign function call (arg 5)
Could you please tell me why ? Thanks