在R中使用带有预测功能的for循环

时间:2019-03-07 00:40:34

标签: r lasso

我已经从训练数据构建了一系列套索回归模型,每个模型都有不同的界限。我的代码如下:

Y <- c(3300, 2600, 2500, 2475, 2313, 2175, 600, 460)
V2 <- c(0.272, 0.269, 0.249, 0.260, 0.273, 0.291, 0.258, 0.228)
V3 <- c(0.302, 0.335, 0.337, 0.292, 0.346, 0.379, 0.370, 0.279)
V4 <- c(69, 58, 54, 59, 87, 104, 34, 16)
V5 <- c(153, 111, 115, 128, 169, 170, 86, 38)
V6 <- c(21, 17, 15, 22, 28, 32, 14, 7)

data <- data.frame(Y, V1, V2, V3, V4, V5)

test.sample <- sample(1:8, 3)
train <- data[-test.sample,]
test <- data[test.sample,]

library(lasso2)
seq1 <- seq(1, 5, by = 1)
seq2 <- seq(6, 10, by = 2)
seq3 <- c(seq1, seq2)
lasso <- l1ce(Y ~ ., data = train, standardize = FALSE, 
              absolute.t = TRUE, bound = seq3)

我想根据测试数据对每个模型进行预测。我认为使用带预测功能的for循环最容易做到这一点,但是我是R的新手,不熟悉for循环。我想知道是否有人可以帮我。

0 个答案:

没有答案