"Unexpected Special in %:%" %do% foreach，但语法正确，并且 foreach 包已加载

Question

foreach(i = 1:nrow(teamAttributes))
%:% foreach(j = 1:nrow(allTeams))
%do% if (teamAttributes$team_api_id[i] == allTeams$home_team_api_id[j]) {
subjectTeamAttributes <- rbind(teamAttributes[i, ], subjectTeamAttributes)
}

##错误消息

Error: unexpected SPECIAL in "%:%"
Error: unexpected SPECIAL in "%do%"
subjectTeamAttributes <- rbind(teamAttributes[i, ], subjectTeamAttributes)
Error in `[.data.frame`(teamAttributes, i, ) : object 'i' not found

Answer 1

由上面的dason回答。格式是问题。将其全部放在一行上解决了问题。

Answer 2

所有管道都应在上一行的末尾，而不是在第二行开始时。请在第1行和第2行末尾插入％do％do％