我是函数新手,所以我不知道如何处理代码,以便能够不断扩展输出df * out_df *,而不是在x上的每个值运行时覆盖它,在本例中,x是 Dataframe * country * 中的每个国家。最后的输出也只有关于巴西的信息。
下面是函数
consume_country_year <- function(x) {
consume <- filter(data1, Consumer %in% x)%>%
filter(year %in% c('2014', '2015', '2016'))%>%
group_by(year)%>%
summarise(Value=sum(Value))
return(consume)
}
country <- c("China", "Germany", "USA", "Brazil")
for (x in country) {
out_df <- consume_country_year(x)
}
多谢了!
3条答案
按热度按时间qyswt5oh1#
如果将
Consumer
添加为另一个分组变量,则应该能够完全避免循环:txu3uszq2#
试试这个
7fyelxc53#
或者这个