Post season batting statistics
A data frame with 15879 observations on the following 22 variables.
Level of playoffs
Player ID code
League; a factor with levels
Runs Batted In
Base on Balls
Hit by pitch
Grounded into double plays
X3B are named
3B in the original database
Lahman, S. (2022) Lahman's Baseball Database, 1871-2021, 2021 version, https://www.seanlahman.com/baseball-archive/statistics/
# Post-season batting data # Requires care since intra-league playoffs have evolved since 1969 # Simplest case: World Series require("dplyr") # Create a sub-data frame for modern World Series play ws <- BattingPost %>% filter(round == "WS" & yearID >= 1903) %>% mutate(BA = 0 + (AB > 0) * round(H/AB, 3), TB = H + X2B + 2 * X3B + 3 * HR, SA = 0 + (AB > 0) * round(TB/AB, 3), PA = AB + BB + IBB + HBP + SH + SF, OB = H + BB + IBB + HBP, OBP = 0 + (AB > 0) * round(OB/PA, 3) ) # Players with most appearances in the WS: ws %>% group_by(playerID) %>% summarise(appearances = n()) %>% arrange(desc(appearances)) %>% head(., 10) # Non-Yankees with most WS appearances ws %>% filter(teamID != "NYA") %>% group_by(playerID) %>% summarise(appearances = n()) %>% arrange(desc(appearances)) %>% head(., 10) # Top ten single WS batting averages ( >= 10 AB ) ws %>% filter(AB > 10) %>% arrange(desc(BA)) %>% head(., 10) # Top ten slugging averages in a single WS ws %>% filter(AB > 10) %>% arrange(desc(SA)) %>% head(., 10) # Hitting stats for the 1946 St. Louis Cardinals, ordered by BA ws %>% filter(teamID == "SLN" & yearID == 1946) %>% arrange(desc(BA)) # Babe Ruth's WS profile ws %>% filter(playerID == "ruthba01") %>% arrange(yearID)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.