如何用R计算足球得分目标的时差

Question

我想获得足球队得分之间的时间间隔的数字向量

df <- data.frame(game=c(1,2,3,4,5,6,6,6,7),goaltime=c(NA,35,51,NA,NA,2,81,90,15))

NA表示球队在该比赛中没有进球。最早的进球可以在比赛中得分为1

每个游戏的总时间为90分钟，因此输出矢量应为

c(125,106,221,79,9,15,75)

Answer 1

您可以尝试：

diff(c(0,setdiff(90*(df$game-1)+df$goaltime,NA),90*max(df$game)))
#[1] 125 106 221  79   9  15  75