From 0412aabe9c207a8fb71dec7c8f7bee798ca43da1 Mon Sep 17 00:00:00 2001
From: Sander Devisscher <sander.devisscher@inbo.be>
Date: Thu, 9 Jan 2025 15:10:14 +0100
Subject: [PATCH] Update compile_cubes.Rmd

#316
---
 src/get_cubes/compile_cubes.Rmd | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/get_cubes/compile_cubes.Rmd b/src/get_cubes/compile_cubes.Rmd
index 080a3318..70ac65a8 100644
--- a/src/get_cubes/compile_cubes.Rmd
+++ b/src/get_cubes/compile_cubes.Rmd
@@ -45,8 +45,6 @@ for(r in cube_files){
 ```
 
 ```{r map compiled cube to match occ cube format, message=NA}
-expected_colnames <- c("year", "eea_cell_code", "taxonKey", "n", "min_coord_uncertainty")
-
 compiled_cube <- compiled_cube %>% 
   filter(!is.na(eeacellcode)) %>%
   mutate(taxonKey = case_when(
@@ -72,8 +70,8 @@ compiled_cube <- compiled_cube %>%
   select(year, 
          "eea_cell_code" = "eeacellcode", 
          taxonKey, 
+         classKey,
          obs = "occurrences", 
-         cobs = "classcount", 
          min_coord_uncertainty = "mincoordinateuncertaintyinmeters")
 ```