R/swing_gam_fit.R

In bayesball/CalledStrike: Functions for Graphing Statcast Data

Defines functions swing_gam_fit

Documented in swing_gam_fit

swing_gam_fit <- function(d){
  gam(Swing ~ s(plate_x, plate_z),
      family=binomial,
      data=d)
}