尝试遍历列表以进行重复的突变

如何解决尝试遍历列表以进行重复的突变

在转弯过程中，我已经收到here的帮助，... 这个：

到此：

我仅对一个团队Aston Villa所做的事情，我现在想对数据集中的所有团队进行尝试。数据集的前15行如下：

我想遍历数据并为所有团队创建其他列，就像我为上面的阿斯顿维拉所做的那样。 首先，我创建了20个团队的列表，并将其称为“团队”。然后我尝试了...

for(i in teams){
  mydata %>% 
    mutate(
      HG = ifelse(HomeTeam == i,FTHG,ifelse(HomeTeam != i,0)),AG = ifelse(AwayTeam == i,FTAG,ifelse(AwayTeam != i,THG = cumsum(HG),TAG = cumsum(AG),Tot = THG+TAG
    )
  
}

但是输出仅显示它为西汉姆联队效力，就像它只为西汉姆联队循环然后停下来一样。即使这样也不正确。

应该在THG，TAG和Tot栏中分别显示每支球队的主场进球数，客场进球数和总得分的总和，但这完全没有发生。如上所述，当我分开一支团队Aston Villa时，效果很好。

我要去哪里错了？

如何保存输出？

解决方法

我认为您浏览列表的方式是错误的。

for (i in 1:length(teams)) {
  teams[[i]] ...
  ...
  
}