如何修复:“;没有适用于'的方法;拉动'&引用;(dplyr)
我有一份1984-1986年的几项如何修复:“;没有适用于'的方法;拉动'&引用;(dplyr),r,dataframe,dplyr,R,Dataframe,Dplyr,我有一份1984-1986年的几项NUTS2代码的清单。我试图得到这三年中每个NUTS2地区的平均GDP。 下面是我试图实现这一点的代码——不幸的是,我总是在最后一行中检索到一个错误,说“pull”不适用于这个类 初始数据集如下所示: 我的代码: 区域拉功能的工作原理稍有不同: library(dplyr) data84_86[i,2] <- mean(pull(gdp_nuts2_member_1984to1986 %>% filter(NUTS_COD
NUTS2
代码的清单。我试图得到这三年中每个NUTS2
地区的平均GDP。
下面是我试图实现这一点的代码——不幸的是,我总是在最后一行中检索到一个错误,说“pull”不适用于这个类
初始数据集如下所示:
我的代码:
区域拉功能的工作原理稍有不同:
library(dplyr)
data84_86[i,2] <- mean(pull(gdp_nuts2_member_1984to1986 %>%
filter(NUTS_CODE == regions[i]), IND_VALUE))
这种方法更容易阅读,计算效率更高
regions <- unique(as.character(gdp_nuts2_member_1984to1986$NUTS_CODE))
data84_86 <- regions
data84_86 <-cbind(data84_86, rep(as.numeric(NA), length(regions)))
colnames(data84_86) <- c("regions","values")
for(i in 1:nrow(data84_86))
{
data84_86[i,2]<-mean(pull((gdp_nuts2_member_1984to1986%>%filter(NUTS_CODE == regions[i]))[,"IND_VALUE"]))
}
library(dplyr)
data84_86[i,2] <- mean(pull(gdp_nuts2_member_1984to1986 %>%
filter(NUTS_CODE == regions[i]), IND_VALUE))
data84_86[i,2] <- gdp_nuts2_member_1984to1986 %>%
filter(NUTS_CODE == regions[i]) %>%
pull(IND_VALUE) %>%
mean()
gdp_nuts2_member_1984to1986 %>%
group_by(NUTS_CODE) %>%
summarise(values = mean(IND_VALUE))