test(calc_designstorm): failing with `devtools::check()`, not with `devtools::test()`

── Error ('test-calc_designstorm.R:3'): Output class is as expected. ───────────
<vctrs_error_scalar_type/vctrs_error/rlang_error/error/condition>
Error in `vec_size()`: `x` must be a vector, not a <sfc_POLYGON/sfc> object.

Backtrace:
     ▆
  1. ├─kostra2010R::calc_designstorm(kostra_ref, d = 60, tn = 20, type = "EulerII") at test-calc_designstorm.R:3:2
  2. │ ├─dplyr::filter(tiles, INDEX_RC == attr(x, "id"))
  3. │ └─dplyr:::filter.data.frame(tiles, INDEX_RC == attr(x, "id"))
  4. │   ├─dplyr::dplyr_row_slice(.data, loc, preserve = .preserve)
  5. │   └─dplyr:::dplyr_row_slice.data.frame(.data, loc, preserve = .preserve)
  6. │     ├─dplyr::dplyr_reconstruct(vec_slice(data, i), data)
  7. │     │ └─dplyr:::dplyr_new_data_frame(data)
  8. │     │   ├─row.names %||% .row_names_info(x, type = 0L)
  9. │     │   └─base::.row_names_info(x, type = 0L)
 10. │     └─vctrs::vec_slice(data, i)
 11. └─vctrs:::stop_scalar_type(`<fn>`(`<s_POLYGO>`), "x", `<fn>`(vec_size()))
 12.   └─vctrs:::stop_vctrs(...)
 13.     └─rlang::abort(message, class = c(class, "vctrs_error"), ..., call = vctrs_error_call(call))

dimfalk / kostra2010R

test(calc_designstorm): failing with `devtools::check()`, not with `devtools::test()` #44