无法使用R中的筛选器获取预期的观察结果

我试图使用从R中的Gapminder获得的数据，并将其清除以用于我的目的。正在讨论的特定数据集是。由于这是我第一次使用R处理任何复杂的数据，所以在将数据导出到R之前，我在Excel中清理了一些数据。具体来说，我将第一列的列名更改为“country”，并将文件保存为CSV，以便通过read.CSV轻松导入。可以找到修改后的csv文件。我的目标是将世界前十大经济体的数据提取到一个新的数据集中。使用我工作目录中的CSV文件，我运行了以下代码

library(dplyr)
library(ggplot2)
library(tidyr)
agri<-read.csv("Agriculture (p of GDP).csv")
agri<-gather(agri, "Year", "P of GDP", 2:52)
top_10_economies<-c("United States", "China", "Japan", "Germany", "United Kingdom", "India", "France", "Brazil", "Italy", "Canada")
agri_top_10<-agri%>%filter(country == top_10_economies)

库（dplyr）
图书馆（GG2）
图书馆（tidyr）
agri我觉得您应该在%

中使用

%

agri_top_10 <- agri %>% filter(country %in% top_10_economies)

agri_top_10%过滤器（前10%经济体中的国家百分比）
如果您想使用baseR而不是dplyr，那么代码相当简单

Top10countries = agri[agri$country %in% top_10_economies,]

谢谢这工作做得很好！虽然我仍然不确定上一个命令失败的原因。为什么只给了我3个countries@Adi与
c（“中国”、“印度”）
相比，我不知道为什么前面的命令起作用。对于其他国家来说，它失败了，这是我想说的，但事实上除外。
Top10countries = agri[agri$country %in% top_10_economies,]