R。 我正在尝试将我的数据框子集几十年。 因此，我想通过使用列的值进行子集化

Question

我有从 1921 年到 2020 年的年份列。我想根据几十年进行分析，所以我想将数据框子集为几十年。 我尝试了几个代码，但他们不断给出错误。

decade1=data_all%>%filter(data_all$year%>%1920:1929)

错误： filter()输入..1有问题。 x 3 arguments 传递给 ':' 这需要 2 ℹ 输入..1是data_all$year %>% 1920:1929 。 运行rlang::last_error()以查看错误发生的位置。

decade1=data_all%>%filter(data_all$year==1920:1929)

警告消息：在 data_all$year == 1920:1929 中：较长的 object 长度不是较短 object 长度的倍数

我应该使用什么代码？

Answer 1

我们可以在filter中将语法更改为%in%

library(dplyr)
data_all%>% 
      filter(year %in% 1920:1929) 

Answer 2

It may help to group the years first.

df <- data.frame(
    year = sample(1920:2020,50,replace = TRUE)
)

df %>% 
  mutate( decade = cut(df$year, breaks=c(1910,1919,1929,1939,1949,1959,1969,1979,1989,1999,2009,2019,2029), 
          labels=c("1910s","1920s","1930s","1940s","1950s","1960s","1970s","1980s","1990s","2000s","2010s","2020s"))) %>%
  arrange(year)

Answer 3

我对练习的解决方案是（与您的非常相似）：

创建新功能，“十年”（基于 log10）

decades <- seq(1890,2010, by=10)

data$decade <- as.factor(data$Year %/% 10 * 10)

print(data$decade)