declense verb in abort by 'offenders' quantity

[corybrunson]

This PR fixes issue #1399, as illustrated below (adapted from this test).

remotes::install_github("corybrunson/recipes", ref = "declense", quiet = TRUE)
library(recipes)
#> Loading required package: dplyr
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union
#> 
#> Attaching package: 'recipes'
#> The following object is masked from 'package:stats':
#> 
#>     step
recipe(mpg ~ ., data = mtcars) %>% 
  step_pca(vs, am, gear, number = 2) %>% 
  prep()
#> Error in `step_pca()`:
#> Caused by error in `prep()`:
#> ! The following argument was specified but does not exist: `number`.
recipe(mpg ~ ., data = mtcars) %>% 
  step_pca(vs, am, gear, number = 2, category = "blue") %>% 
  prep()
#> Error in `step_pca()`:
#> Caused by error in `prep()`:
#> ! The following arguments were specified but do not exist: `number` and
#>   `category`.

^{Created on 2024-11-25 with reprex v2.1.1}

[corybrunson]

Argh, thanks, sorry for omitting the snapshots!

[EmilHvitfeldt]

no problem!

thank you for your contribution!