data <- read.csv("data1.csv",header = TRUE)
#加载adapt-lasso源代码
source("lasso.adapt.bic2.txt")
out1 <- lasso.adapt.bic2(x=data[1:13],y=data$y)
names(out1)

相关文章:
-
2022-12-23
-
2021-09-23
-
2021-05-29
-
2022-12-23
-
2022-12-23
-
2021-09-23
-
2022-01-10
-
2021-08-15
猜你喜欢
-
2021-07-05
-
2021-11-03
-
2021-08-30
-
2021-05-07
-
2021-07-03
-
2022-12-23
-
2021-03-31
相关资源
-
下载
2023-02-13
-
下载
2021-06-07
-
下载
2022-12-02
-
下载
2023-02-24
-
下载
2021-06-24