Problem with geometry variables in Step_impute

[nhward]

This bug is related to #1394 in that it involves spatial data frames. The complete.cases() line in step_impute_* does not work with geometry (i.e. 'sfc' classed) variables. I am not sure why the variable is even looked at as it should play no part in the imputation due to the role I have given it.

This may be related to #1374

Reproducible example:

library(recipes)
library(sf)
data <- sf::st_read(system.file("shape/nc.shp", package="sf"))

class(data) <- setdiff(class(data), "sf")
class(data$geometry)

recipes::recipe(formula = ~ ., data = data) |>
  recipes::update_role(geometry, new_role = "geometry") |>
  recipes::step_impute_knn(all_predictors()) |>
  recipes::prep(strings_to_factors = FALSE)

#> Error in `step_impute_knn()`:
#> Caused by error in `complete.cases()`:
#> ! invalid 'type' (list) of argument

Don't be confused by the column called "geometry" and the role called "geometry".