编写循环以在 R 中对矩阵进行切片

Question

我有一个非常基本的循环问题：

我有一个矩阵 (365x20)。所以二十年来我每天都有降雨数据。

我需要对矩阵进行切片以便进行接下来的分析步骤，我这样做是这样的：

year1 <- as.vector(Rainfall_data$year1)                   
year2 <- as.vector(Rainfall_data$year2)             
...         
year20 <- as.vector(Rainfall_data$year20)

这给了我总共 20 个单个 1x365 向量。

现在，我想对转置的 Rainfall 数据执行相同的操作，以获得包含所有 20 年同一天的值的向量。因为这意味着做

as.vector(t_Rainfall_data$day1-365)

我想写一个循环。这些列称为第 1 天到第 365 天。t_Rainfall_data 将是转置矩阵。主要目的是获得总共 365 个单个 1x20 向量。

我尝试了几种方法，但都失败了。

Answer 1

cmets 是对的：您想对向量 day1 执行的任何操作都可以使用 t_Rainfall_data$day1（或可能使用 Rainfall_data[1,]）来完成，最好在执行时对数据框进行切片用它做一些事情，而不是从中创建很多冗余向量。同样，即使您需要一堆对象，处理对象列表几乎总是比创建单独的命名对象更容易。说了这么多，这里是如何获得你想要的东西：

与在 cmets 中一样，您可以返回一个向量列表

lapply(seq_len(nrow(Rainfall_data)), function(i) Rainfall_data[i, ])

如果您更喜欢循环，并创建对象而不是返回列表，您可以执行类似的操作

for(i in 1:nrow(Rainfall_data){
  assign(paste0("day",i),as.vector(t_Rainfall_data[,paste0("day",i)]))
  }

assign 将创建一个以传递给它的字符串命名的对象，其中包含第二个参数。