From 0969c2ce5a14034650f3c53680ea9ce58a1dd8c2 Mon Sep 17 00:00:00 2001
From: Cidree <adrian.cidre@gmail.com>
Date: Fri, 8 Nov 2024 11:29:09 +0100
Subject: [PATCH] fix small error on datum of ifn3

---
 R/forest-inventory.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/forest-inventory.R b/R/forest-inventory.R
index 0caaaaa..63b4eb2 100644
--- a/R/forest-inventory.R
+++ b/R/forest-inventory.R
@@ -393,7 +393,7 @@ fd_inventory_spain <- function(province,
           data_lst$PCDatosMap_sf <- sf::st_as_sf(
             x      = data_lst$PCDatosMap,
             coords = c("CoorX", "CoorY"),
-            crs    = paste0("EPSG:", datum, data_lst$PCDatosMap$Huso[1])
+            crs    = paste0("EPSG:230", data_lst$PCDatosMap$Huso[1])
           )
         }