data-raw/league_scoring_rules.R

In scottfrechette/fvoa: Frech-Adjusted Value Over Average for Fantasy Football

league_scoring_rules <- list(

  sx_baseline = c(QB = 16,
                  RB = 48,
                  WR = 48,
                  TE = 13,
                  K = 10,
                  DST = 10),

  sx_scoring = list(
    pass = list(
      pass_att = 0,
      pass_comp = 0,
      pass_inc = 0,
      pass_yds = 0.04,
      pass_tds = 4,
      pass_int = -2,
      pass_40_yds = 0,
      pass_300_yds = 0,
      pass_350_yds = 0,
      pass_400_yds = 0),
    rush = list(
      all_pos = TRUE,
      rush_yds = 0.1,
      rush_att = 0,
      rush_40_yds = 0,
      rush_tds = 6,
      rush_100_yds = 0,
      rush_150_yds = 0,
      rush_200_yds = 0),
    rec = list(
      all_pos = TRUE,
      rec = 0.5,
      rec_yds = 0.1,
      rec_tds = 6,
      rec_40_yds = 0,
      rec_100_yds = 0,
      rec_150_yds = 0,
      rec_200_yds = 0),
    misc = list(
      all_pos = TRUE,
      fumbles_lost = -2,
      fumbles_total = 0,
      sacks = 0,
      two_pts = 2),
    kick = list(
      xp = 1.0,
      fg_0019 = 3.0,
      fg_2029 = 3.0,
      fg_3039 = 3.0,
      fg_4049 = 4.0,
      fg_50 = 5.0,
      fg_miss = -1.0),
    ret = list(
      all_pos = TRUE,
      return_tds = 6,
      return_yds = 0),
    idp = list(
      all_pos = TRUE,
      idp_solo = 0.5,
      idp_asst = 0,
      idp_sack = 3,
      idp_int = 3,
      idp_fum_force = 2,
      idp_fum_rec = 2,
      idp_pd = 1,
      idp_td = 6,
      idp_safety = 2),
    dst = list(
      dst_fum_rec = 2,
      dst_int = 2,
      dst_safety = 2,
      dst_sacks = 1,
      dst_td = 6,
      dst_blk = 2,
      dst_ret_yds = 0,
      dst_pts_allowed = 0),
    pts_bracket = list(
      list(threshold = 0, points = 10),
      list(threshold = 6, points = 7),
      list(threshold = 13, points = 4),
      list(threshold = 17, points = 1),
      list(threshold = 27, points = -1),
      list(threshold = 34, points = -4),
      list(threshold = 45, points = -7),
      list(threshold = 99, points = -10))
  ),

  clt_baseline = c(QB = 16,
                   RB = 48,
                   WR = 48,
                   TE = 13,
                   K = 10,
                   DST = 10),

  clt_scoring = list(
    pass = list(
      pass_att = 0,
      pass_comp = 0,
      pass_inc = 0,
      pass_yds = 0.0333,
      pass_tds = 6,
      pass_int = -2,
      pass_40_yds = 0,
      pass_300_yds = 0,
      pass_350_yds = 0,
      pass_400_yds = 0),
    rush = list(
      all_pos = TRUE,
      rush_yds = 0.1,
      rush_att = 0,
      rush_40_yds = 0,
      rush_tds = 6,
      rush_100_yds = 0,
      rush_150_yds = 0,
      rush_200_yds = 0),
    rec = list(
      all_pos = TRUE,
      rec = 0,
      rec_yds = 0.1,
      rec_tds = 6,
      rec_40_yds = 0,
      rec_100_yds = 0,
      rec_150_yds = 0,
      rec_200_yds = 0),
    misc = list(
      all_pos = TRUE,
      fumbles_lost = -2,
      fumbles_total = 0,
      sacks = 0,
      two_pts = 2),
    kick = list(
      xp = 1.0,
      fg_0019 = 3.0,
      fg_2029 = 3.0,
      fg_3039 = 3.0,
      fg_4049 = 3.0,
      fg_50 = 4.0,
      fg_miss = 0.0),
    ret = list(
      all_pos = TRUE,
      return_tds = 6,
      return_yds = 0),
    idp = list(
      all_pos = TRUE,
      idp_solo = 0.5,
      idp_asst = 0,
      idp_sack = 3,
      idp_int = 3,
      idp_fum_force = 2,
      idp_fum_rec = 2,
      idp_pd = 1,
      idp_td = 6,
      idp_safety = 2),
    dst = list(
      dst_fum_rec = 2,
      dst_int = 2,
      dst_safety = 2,
      dst_sacks = 1,
      dst_td = 6,
      dst_blk = 1.5,
      dst_ret_yds = 0,
      dst_pts_allowed = 0),
    pts_bracket = list(
      list(threshold = 0, points = 10),
      list(threshold = 6, points = 7),
      list(threshold = 13, points = 4),
      list(threshold = 20, points = 1),
      list(threshold = 27, points = 0),
      list(threshold = 34, points = -1),
      list(threshold = 99, points = -4))
  )
)

usethis::use_data(league_scoring_rules, overwrite = TRUE)