如何使用循环将excel中的列分配给R中的变量？

Question

我真的不擅长循环，即使它很容易。从excel，col_names=TRUE，我想将每列用作x_i的独立变量，其中i in 1:256和第257列作为因变量。 excel有257列作为变量，它看起来像这样：

      1     2    3    4    5        ...      255   256  257
R1   -2.2 -5.4 -1.4 -2.4 -4.9       ...     -8.9  -7.8  69
R2   -1.2 -3.3 -0.5 -1.6 -4.0       ...     -7.0  -5.5  50
R3             ...                             ...
R4             ...                             ...
R5             ...                             ...

我试过

>data <- read_excel("data.xlsx",col_names = T) 
>for (i in 1:256) {
 x_i <- data$`i`
 }

并以

结束

  

有50个或更多警告（使用警告（）查看前50个

我想建立一个模型，例如回归：

>y <- data$'257'
>X <- c(x_1,x_2,...,x_256)
>lmr <- lm(y~X)

我该如何解决？我应该使用函数分配吗？谢谢你的帮助。