mydata <- read.table(header=TRUE, text="
Away Home Game.ID Points.A Points.H Series.ID Series.Wins
Denver Utah aaa123 121 123 aaabbb Utah
Denver Utah aaa124 132 116 aaabbb Denver
Utah Denver aaa125 117 121 aaabbb Denver
Utah Denver aaa126 112 120 aaabbb Denver
Denver Utah aaa127 115 122 aaabbb Utah
Atlanta Boston aab123 112 114 aaaccc Boston
")
我正在尝试创建一个额外的列,一次一个,每个Series.ID组中的Series.Wins。因此,根据上面的数据,该列列将如下所示:
new.column <- c(1, 1, 2, 3, 2, 1)
最终目标是拿出一系列纪录专栏,以及#34;主场胜利 - 客场胜利&#34;:
Record <- c(1-0, 1-1, 2-1, 3-1, 2-3, 1-0)
答案 0 :(得分:1)
这似乎有效:
mydata <- mydata %>% group_by(Series.Wins) %>% group_by(Series.ID, add = TRUE) %>% mutate(id = seq_len(n()))