r - 使用 for 循环获取数据帧的第 n 列

Question

假设我有一个名为sample 的非常简单的数据框:

read.table(header=TRUE,text="a_1 a_2 a_3
                              1    1   1
                              1    1   1
                              1    1   1")

我想通过使用 for 循环获取此数据帧的第 n 列。例如:

for(i in i:3) {
    nth <- sample$a_[i]
    #there are still a lot more lines of code after this, think a bajillion calculations
}

很明显这行不通(我认为 Java 真的很难)。 R 中的任何等效项？

这是新手 R 程序员提出的新手问题。

感谢所有回复的人。

编辑这只是所讨论情况的最简单形式。我拥有的真实数据框非常宽。

Answer 1

您可以使用 data_frame[, "column_name"] 表示法按名称访问列。对于您的示例，它看起来像:

col_names <- colnames(sample)
for(i in c(1:3)) {
   nth <- sample[, col_names[i]]
   print(nth)
}

它给了

[1] 1 1 1
[1] 1 1 1
[1] 1 1 1

对于更复杂的情况，您可以使用 eval 函数从字符串中评估命令。在这里您可能需要 sprintf 函数来准备该字符串。例如:

for(i in c(1:3)) {
    # prepare call string
    name_call <- sprintf("sample$a_%s", i)
    # evaluate command from string
    nth <- eval(parse(text = name_call))
    print(nth)
}

再次给出:

[1] 1 1 1
[1] 1 1 1
[1] 1 1 1