df <- structure(list(`a a` = 1:3, `a b` = 2:4), .Names = c("a a", "a b"
), row.names = c(NA, -3L), class = "data.frame")
数据看起来像
a a a b
1 1 2
2 2 3
3 3 4
以下调用选择
select(df, 'a a')
给予
Error in abs(ind[ind < 0]) :
non-numeric argument to mathematical function
如何使用select 选择“a a”和/或将其重命名为没有空格的名称？我知道以下方法：
names(df)[1] <- "a"select(df, a=1)select(df, ends_with("a"))但如果我正在处理大型数据集，我如何在不知道索引号或类似列名的情况下获得精确匹配？
【问题讨论】：
您可以使用反引号` 来select 变量。
select(df, `a a`)
# a a
# 1 1
# 2 2
# 3 3
但是，如果您的主要目标是重命名该列，您可以在 plyr 包中使用 rename，在其中您可以同时使用 "" 和 ``。
rename(df, replace = c("a a" = "a"))
rename(df, replace = c(`a a` = "a"))
或者在baseR:
names(df)[names(df) == "a a"] <- "a"
有关使用各种引号的更详细说明，请参阅?Quotes。 “名称和标识符”部分在这里特别重要：
可以使用其他 [语法上无效的] 名称，只要它们被引用。首选引号是反引号”。
另请参阅?make.names 了解有效名称。
另请参阅this postdplyr 中有关重命名的信息
【讨论】：
select做同样的事情：select(df, a=`a a`)
rename相反）？
rename 将复制整个 data.frame 只是为了重命名列。所以，我不会使用它/认为它有效。我不确定data.table 中是否有类似setattr 的方法。例如：setattr(df, 'names', c("a", "b")) 在此处通过引用重命名。
dplyr 中有一个函数rename 可以破坏plyr 函数。如果您真的想要plyr 版本，您可以使用plyr:::rename。
反引号的一些替代方案，从 dplyr 0.5.0 开始，即撰写本文时的当前版本。
如果您尝试以编程方式选择一个参数作为列，并且您不想重命名或将列名称执行为类似paste/sprintf 的反引号，您可以将as.name 与non-standard evaluation 版本的select，即select_：
dplyr::select_(df, as.name("a a"))
许多dplyr 函数都有非标准版本。具体到select的情况下，还可以结合选择助手one_of使用标准版。有关文档，请参阅 ?dplyr::select_helpers：
dplyr::select(df, dplyr::one_of("a a"))
【讨论】：
colnames(mtcars)[1] <- "Miles Per Gallon"mtcars %>% select_("Miles Per Gallon") 这将返回一个错误。
mtcars %>% select_(as.name("Miles Per Gallon")) 工作。
您可以将间隔变量锁定在 Esc 下的“`”中。请注意，该标志与
不同a b\
【讨论】：