diff --git a/R/area-based.3.mapping.and.inference.Rmd b/R/area-based.3.mapping.and.inference.Rmd
index 2c586c7d122767c8bc8c39cb6a1c5903626fdf07..74a56422b65de5ecb4602a2c248feaaa9eb64062 100644
--- a/R/area-based.3.mapping.and.inference.Rmd
+++ b/R/area-based.3.mapping.and.inference.Rmd
@@ -169,7 +169,7 @@ dummy <- lidaRtRee::raster_metrics(r_treechm,
   },
   output = "raster"
 )
-names(dummy) <- c("TreeCanop_cover_in_plot", "TreeCanopy_meanH_in_plot")
+names(dummy) <- c("TreeCanopy_cover_in_plot", "TreeCanopy_meanH_in_plot")
 metrics_trees <- raster::addLayer(metrics_trees, dummy)
 ```
 
@@ -471,4 +471,4 @@ plot(sf::st_geometry(forest_cropped), add = TRUE)
 
 # Inference
 
-Work in progress...
\ No newline at end of file
+Work in progress...