добавив к моему первоначальному вопросу здесь :
Я пытаюсь подсчитать количество (побед) каждой страны.Поэтому я использовал конвейер из своего информационного кадра, который позволяет мне определить количество победивших отдельных команд, , сейчас я пытаюсь подсчитать, сколько раз каждая отдельная команда выиграла .Я сейчас на этом месте.
#
library(tidyverse)
library(dplyr)
results <- intl.football.results
results1 <- results[ , c("home_team","away_team","home_score","away_score")]
results10 <- results[1:10, c("home_team","away_team","home_score","away_score")]
results1$who_wins <- with(results1,
ifelse(home_score > away_score, results10$home_team,
ifelse(home_score < away_score, results$away_team, 0)))
final <- results1$who_wins
finaldeck <- data.frame(results1)
finaldeck %>%
group_by(who_wins) %>% distinct(who_wins)