给列数字名称

Question

我已经导入了一个使用数字作为列标题的Excel文件。为此，我尝试通过以下方式重现非常小的数据集版本：

Country <- c("A", "C")
`1990` <- c(100,200)
`2000` <- c(200,300)
`2020` <- c(100,300)
pop <- data.frame(Country, `1990`, `2000`, `2020`)
setnames(pop, old=c(`1990`,`2000`, `2020`), new=c("1990","2000","2020"))

除了尝试使用setnames()之外，我还尝试使用names()并分配数字而不是字符串，但是在每种情况下，它都以“ X”开头。为了使我的玩具示例与我最终要尝试操作的真实事物匹配，我需要不是这种情况。我该怎么办？

Answer 1

library(dplyr)

pop <- data_frame(
  Country = c("A", "C"),
  `1990` = c(100, 200),
  `2000` = c(200, 300),
  `2020` = c(100, 300)
)