Displaying 1 result from an estimated 1 matches for "tex201304050".
2020 Oct 08
0
Retrosheet Data
...ength(P),get_plays))
}
all_plays <- do.call("rbind",lapply(Teams[1:30],get_team_plays))
head(all_plays,10)
I get the following six variables from the play section of the retrosheet data:
head(all_plays,10)
Game inning team retroID count pitches play
1 TEX201304050 1 0 troum001 01 CX 63/G
2 TEX201304050 1 0 aybae001 12 TBFX 7/F
3 TEX201304050 1 0 pujoa001 00 X 6/L
4 TEX201304050 1 1 kinsi001 02 FCX 53/G
Very us...