Some eea_cell_codes from baseline are corrupted

[SanderDevisscher]

In the current version of the baseline (classes cube on zenodo) there are some eea_cell_codes that got corrupted, For example 1kmE-1472N1205.

This issue causes this part of the code to produce the error below:

indicators/src/05_occurrence_indicators_preprocessing.Rmd

Lines 349 to 364 in 9e9668d

	```{r extract_x_y_baseline}
	df_bl_xy <-
	df_bl %>%
	tidylog::distinct(eea_cell_code) %>%
	bind_cols(
	tibble(
	x = unlist(str_extract_all(unique(df_bl$eea_cell_code),
	pattern = "(?<=E)[0-9\\-]+"
	)),
	y = unlist(str_extract_all(unique(df_bl$eea_cell_code),
	pattern = "(?<=N)[0-9\\-]+"
	))
	) %>%
	mutate_all(as.integer)
	)
	```

Error in `tibble()`:
! Tibble columns must have compatible sizes.
• Size 49146: Existing data.
• Size 49147: Column `y`.
ℹ Only values of size one are recycled.
Run `rlang::last_trace()` to see where the error occurred.

[SanderDevisscher]

other example: 1kmE492N2410

[SanderDevisscher]

there are also 186 NA's