R/grid_predict.R

In bayesball/CalledStrike: Functions for Graphing Statcast Data

Defines functions grid_predict

Documented in grid_predict

grid_predict <- function(fit){
  grid <- expand.grid(plate_x = seq(-1.5, 1.5, length=50),
                      plate_z = seq(1, 4, length=50))
  grid$lp <- predict(fit, grid, type = "response")
  grid
}