r语言 - 如何使用条件运算符 (>) 选择列？

Question

我正在尝试选择标题为"X1995"到"X2020"的列，我打算使用条件运算符通过选择"X1994"以上的列来进行选择。

library(readr)
dat <- read.csv("per_capita.csv")
head(dat)
a <- dat$X1994[dat$Country.Name == "India"]
a
format(a, scientific = F, big.mark = ',')
b <- dat$1994>[dat$Country.Name == "India"]
b

Answer 1

假设除"Country.Name"外的所有列都有前缀"X"，后跟4位年份，filter表示Country.Name为"India"的行，select表示通过提取数字部分将列名转换为数字后的行，并使用>

library(dplyr)
dat %>%
filter(Country.Name == "India") %>%
select(names(.)[-1][readr::parse_number(names(.)[-1]) > 1994])