Here's a reproducible script for everything in sysdata.rda.

'special positions' handles positions like CI and Util. Here are the mappings:

special_positions_map <- list(
  'CI' = c('1B', '3B'),
  'MI' = c('2B', 'SS'),
  'Util' = c('C', '1B', '2B', 'SS', '3B', 'OF', 'DH'),
  'P' = c('SP', 'RP')
)

Save:

save(special_positions_map, file = file.path('data', 'special_positions_map.rda'))


almartin82/projprep documentation built on May 10, 2019, 9:57 a.m.