Message warning for `mutate_if` usage in `recode_shadow`

This is no longer an issue:

library(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
library(naniar)

aq_recoded <- airquality %>%
  nabular() %>%
  recode_shadow(Ozone = .where(Wind <= 5 ~ "broken_machine"))

aq_recoded %>% 
  arrange(Wind)
#> # A tibble: 153 × 12
#>    Ozone Solar.R  Wind  Temp Month   Day Ozone_NA     Solar.R_NA Wind_NA Temp_NA
#>    <int>   <int> <dbl> <int> <int> <int> <fct>        <fct>      <fct>   <fct>  
#>  1    NA      59   1.7    76     6    22 NA_broken_m… !NA        !NA     !NA    
#>  2   118     225   2.3    94     8    29 NA_broken_m… !NA        !NA     !NA    
#>  3    73     183   2.8    93     9     3 NA_broken_m… !NA        !NA     !NA    
#>  4   168     238   3.4    81     8    25 NA_broken_m… !NA        !NA     !NA    
#>  5   122     255   4      89     8     7 NA_broken_m… !NA        !NA     !NA    
#>  6   135     269   4.1    84     7     1 NA_broken_m… !NA        !NA     !NA    
#>  7    NA      91   4.6    76     6    23 NA_broken_m… !NA        !NA     !NA    
#>  8    64     175   4.6    83     7     5 NA_broken_m… !NA        !NA     !NA    
#>  9    66      NA   4.6    87     8     6 NA_broken_m… NA         !NA     !NA    
#> 10    91     189   4.6    93     9     4 NA_broken_m… !NA        !NA     !NA    
#> # ℹ 143 more rows
#> # ℹ 2 more variables: Month_NA <fct>, Day_NA <fct>

aq_grouped_recoded <- airquality %>%
  bind_shadow() %>%
  dplyr::group_by(Month) %>%
  recode_shadow(Ozone = .where(Wind <= 5 ~ "broken_machine"))

aq_grouped_recoded %>% 
  arrange(Wind,
          Month)
#> # A tibble: 153 × 12
#> # Groups:   Month [5]
#>    Month Ozone Solar.R  Wind  Temp   Day Ozone_NA     Solar.R_NA Wind_NA Temp_NA
#>    <int> <int>   <int> <dbl> <int> <int> <fct>        <fct>      <fct>   <fct>  
#>  1     6    NA      59   1.7    76    22 NA_broken_m… !NA        !NA     !NA    
#>  2     8   118     225   2.3    94    29 NA_broken_m… !NA        !NA     !NA    
#>  3     9    73     183   2.8    93     3 NA_broken_m… !NA        !NA     !NA    
#>  4     8   168     238   3.4    81    25 NA_broken_m… !NA        !NA     !NA    
#>  5     8   122     255   4      89     7 NA_broken_m… !NA        !NA     !NA    
#>  6     7   135     269   4.1    84     1 NA_broken_m… !NA        !NA     !NA    
#>  7     6    NA      91   4.6    76    23 NA_broken_m… !NA        !NA     !NA    
#>  8     7    64     175   4.6    83     5 NA_broken_m… !NA        !NA     !NA    
#>  9     8    66      NA   4.6    87     6 NA_broken_m… NA         !NA     !NA    
#> 10     9    91     189   4.6    93     4 NA_broken_m… !NA        !NA     !NA    
#> # ℹ 143 more rows
#> # ℹ 2 more variables: Month_NA <fct>, Day_NA <fct>

^{Created on 2023-05-01 with reprex v2.0.2}

Session info

``` r sessioninfo::session_info() #> ─ Session info ─────────────────────────────────────────────────────────────── #> setting value #> version R version 4.3.0 (2023-04-21) #> os macOS Ventura 13.2 #> system aarch64, darwin20 #> ui X11 #> language (EN) #> collate en_US.UTF-8 #> ctype en_US.UTF-8 #> tz America/Los_Angeles #> date 2023-05-01 #> pandoc 2.19.2 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/ (via rmarkdown) #> #> ─ Packages ─────────────────────────────────────────────────────────────────── #> package * version date (UTC) lib source #> cli 3.6.1 2023-03-23 [1] CRAN (R 4.3.0) #> colorspace 2.1-0 2023-01-23 [1] CRAN (R 4.3.0) #> digest 0.6.31 2022-12-11 [1] CRAN (R 4.3.0) #> dplyr * 1.1.2 2023-04-20 [1] CRAN (R 4.3.0) #> evaluate 0.20 2023-01-17 [1] CRAN (R 4.3.0) #> fansi 1.0.4 2023-01-22 [1] CRAN (R 4.3.0) #> fastmap 1.1.1 2023-02-24 [1] CRAN (R 4.3.0) #> forcats 1.0.0 2023-01-29 [1] CRAN (R 4.3.0) #> fs 1.6.2 2023-04-25 [1] CRAN (R 4.3.0) #> generics 0.1.3 2022-07-05 [1] CRAN (R 4.3.0) #> ggplot2 3.4.2 2023-04-03 [1] CRAN (R 4.3.0) #> glue 1.6.2 2022-02-24 [1] CRAN (R 4.3.0) #> gtable 0.3.3 2023-03-21 [1] CRAN (R 4.3.0) #> htmltools 0.5.5 2023-03-23 [1] CRAN (R 4.3.0) #> knitr 1.42 2023-01-25 [1] CRAN (R 4.3.0) #> lifecycle 1.0.3 2022-10-07 [1] CRAN (R 4.3.0) #> magrittr 2.0.3 2022-03-30 [1] CRAN (R 4.3.0) #> munsell 0.5.0 2018-06-12 [1] CRAN (R 4.3.0) #> naniar * 1.0.0.9000 2023-05-01 [1] local #> pillar 1.9.0 2023-03-22 [1] CRAN (R 4.3.0) #> pkgconfig 2.0.3 2019-09-22 [1] CRAN (R 4.3.0) #> purrr 1.0.1 2023-01-10 [1] CRAN (R 4.3.0) #> R.cache 0.16.0 2022-07-21 [1] CRAN (R 4.3.0) #> R.methodsS3 1.8.2 2022-06-13 [1] CRAN (R 4.3.0) #> R.oo 1.25.0 2022-06-12 [1] CRAN (R 4.3.0) #> R.utils 2.12.2 2022-11-11 [1] CRAN (R 4.3.0) #> R6 2.5.1 2021-08-19 [1] CRAN (R 4.3.0) #> reprex 2.0.2 2022-08-17 [1] CRAN (R 4.3.0) #> rlang 1.1.0 2023-03-14 [1] CRAN (R 4.3.0) #> rmarkdown 2.21 2023-03-26 [1] CRAN (R 4.3.0) #> rstudioapi 0.14 2022-08-22 [1] CRAN (R 4.3.0) #> scales 1.2.1 2022-08-20 [1] CRAN (R 4.3.0) #> sessioninfo 1.2.2 2021-12-06 [1] CRAN (R 4.3.0) #> styler 1.9.1 2023-03-04 [1] CRAN (R 4.3.0) #> tibble 3.2.1 2023-03-20 [1] CRAN (R 4.3.0) #> tidyr 1.3.0 2023-01-24 [1] CRAN (R 4.3.0) #> tidyselect 1.2.0 2022-10-10 [1] CRAN (R 4.3.0) #> utf8 1.2.3 2023-01-31 [1] CRAN (R 4.3.0) #> vctrs 0.6.2 2023-04-19 [1] CRAN (R 4.3.0) #> visdat 0.6.0 2023-02-02 [1] CRAN (R 4.3.0) #> withr 2.5.0 2022-03-03 [1] CRAN (R 4.3.0) #> xfun 0.39 2023-04-20 [1] CRAN (R 4.3.0) #> yaml 2.3.7 2023-01-23 [1] CRAN (R 4.3.0) #> #> [1] /Library/Frameworks/R.framework/Versions/4.3-arm64/Resources/library #> #> ────────────────────────────────────────────────────────────────────────────── ```

njtierney / naniar

Message warning for `mutate_if` usage in `recode_shadow` #263