DOn't check type of NA values

[strengejacke]

library(datawizard)
data(mtcars)
x1 <- recode_into(
  mpg > 10 ~ 1,
  gear == 5 ~ NA_real_,
  data = mtcars
)
#> Warning: Several recode patterns apply to the same cases. Some of the already
#>   recoded cases will be overwritten with new values again (e.g. pattern 2
#>   overwrites the former recode of case 27).
#>   Please check if this is intentional!
# this didn't work before
x2 <- recode_into(
  mpg > 10 ~ 1,
  gear == 5 ~ NA,
  data = mtcars
)
#> Warning: Several recode patterns apply to the same cases. Some of the already
#>   recoded cases will be overwritten with new values again (e.g. pattern 2
#>   overwrites the former recode of case 27).
#>   Please check if this is intentional!
identical(x1, x2)
#> [1] TRUE

^{Created on 2024-05-04 with reprex v2.1.0}