2021_01_ARI_TEN has a extra_point issue

[ak47twq]

seasonnum1 <- 2021
seasonnum2 <- 2021
weeknum1 <- 1
weeknum2 <- 1

extra_point<-pbp%>%
     filter(season>=seasonnum1, season<=seasonnum2, week>=weeknum1, week<=weeknum2, extra_point_attempt==1)%>% 	 
	 select(play_id, game_id,season, week, qtr, time, posteam, desc, play_type, extra_point_result, defensive_extra_point_conv,defensive_extra_point_attempt)%>%
	 collect()

play id:2003
desc:5-M.Prater extra point is GOOD, Center-46-A.Brewer, Holder-14-A.Lee. PENALTY on TEN-29-D.Cruikshank, Defensive Offside, 5 yards, enforced between downs.
play_type:no_play

i wonder if the play_type should be "extra_point"?

[guga31bb]

Seems like a bug:

pbp <- nflfastR::build_nflfastR_pbp("2021_01_ARI_TEN")

pbp %>%
  filter(play_id == 2003) %>%
  select(play_id, game_id, posteam, desc, play_type, play_type_nfl, extra_point_result, extra_point_attempt)

# A tibble: 1 x 8
  play_id game_id   posteam desc                  play_type play_type_nfl extra_point_res~ extra_point_att~
    <dbl> <chr>     <chr>   <chr>                 <chr>     <chr>         <chr>                       <dbl>
1    2003 2021_01_~ ARI     5-M.Prater extra poi~ no_play   XP_KICK       good                            1

Probably needs to be fixed here https://github.com/nflverse/nflfastR/blob/master/R/helper_add_nflscrapr_mutations.R#L331