如何通过变量访问dataframe中名称为数字的列？

这个问题我之前也碰到过！核心原因是R的$运算符会把后面的表达式当成字面量列名，而不是变量引用——哪怕你用了反引号，里面的k还是会被当成叫k的列，而不是变量k的值。下面给你几个实用的解决方案，完美适配你遍历列名的需求：

1. 优先使用方括号[[或[索引（最通用） #

这是R原生的解决方案，不管列名是数字还是特殊字符都能完美适配，尤其适合循环场景：

单个变量选列 #

首先要注意：你的列名是字符串类型的"99"，不是数字99，所以变量要存字符串值：

k <- "99"
# 取单列的第一个元素（返回向量）
print(df[[k]][1])
# 或者取整列（返回dataframe子集）
print(df[, k][1, ])

循环遍历所有列 #

你原来的循环里df[,i]其实是可行的，但用[[i]]取向量更高效，按需选择：

for (i in colnames(df)){
  # 方式1：取当前列的向量形式
  col_vector <- df[[i]]
  print(col_vector[1])  # 打印第一行元素
  
  # 方式2：取当前列的dataframe子集（保留列结构）
  col_df <- df[, i, drop = FALSE]
  print(col_df[1, ])
}

2. 用dplyr的函数适配tidyverse风格 #

如果你习惯用dplyr，要注意不能直接把变量传给select()或pull()，需要用all_of()来告诉dplyr：这是一个变量，不是字面量列名：

单个变量选列 #

library(dplyr)
k <- "99"
# 取单列向量并打印第一个元素
df %>% pull(all_of(k)) %>% .[1]
# 或者选择列并打印第一行
df %>% select(all_of(k)) %>% slice(1)

循环遍历所有列 #

for (i in colnames(df)){
  col_data <- df %>% pull(all_of(i))
  print(col_data[1])
}

补充：为什么df$99``能生效？ #

反引号的作用是让R识别非标准列名（比如数字、含空格/特殊字符的列名），把它当成合法的列名而不是数字或语法符号。但反引号只对字面量有效，不能解析里面的变量——这就是df$k``失效的原因，它在找名为k的列，而不是变量k对应的列名。

内容的提问来源于stack exchange，提问作者Abyssal Beauty