Fails with data.table sf input

[Robinlovelace]

As reported by @temospena.

Solution, something like this:

sf::st_sf(
  det %>% sf::st_drop_geometry() %>% tibble::as_tibble(),
  geometry = det$geometry
  )