Skip to content
This repository has been archived by the owner on Oct 30, 2024. It is now read-only.

replace code_level with nchar #29

Merged
merged 2 commits into from
Mar 14, 2024
Merged
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion R/create_benchmark_loanbook.R
Original file line number Diff line number Diff line change
Expand Up @@ -36,7 +36,7 @@
benchmark_sectors <- r2dii.data::nace_classification %>%
dplyr::filter(.data$borderline == FALSE) %>%
dplyr::group_by(.data$sector) %>%
dplyr::slice_max(.data$code_level, n = 1) %>%
dplyr::slice_max(nchar(.data$code), n = 1) %>%

Check warning on line 39 in R/create_benchmark_loanbook.R

View check run for this annotation

Codecov / codecov/patch

R/create_benchmark_loanbook.R#L39

Added line #L39 was not covered by tests
dplyr::slice_head(n = 1) %>%
dplyr::ungroup() %>%
dplyr::select("sector", "code")
Expand Down
Loading