diff --git a/maquette_espece_page.qmd b/maquette_espece_page.qmd
index 13f25cef74fee25402b69e56c25c2baa465bb953..72a35b98ac06616de30bfc0dcdba56f3af1fdd09 100644
--- a/maquette_espece_page.qmd
+++ b/maquette_espece_page.qmd
@@ -26,7 +26,7 @@ source("fonctions/var.R")
 
 <!-- ####################################################################### -->
 
-# `{r} params$sp_name` {orientation="columns"}
+# `r params$sp_name` {orientation="columns"}
 
 ```{r}
 # Librairies
@@ -213,7 +213,7 @@ histo_grega(df_grega = df_gregarite,
 
 ### Indice de grégarité par espèce
 ```{r}
-names_grega = unique(df_gregarite_all %>% arrange(classif) %>% select(nom_espece) %>% as.vector())
+names_grega = unique(df_gregarite_all %>% arrange(classif) %>% select(nom_espece) %>% as.data.frame())
 color_txt = rep("black", length(names_grega$nom_espece))
 position_sp = which(unique(names_grega$nom_espece) == sp_name)
 color_txt[position_sp] = "red"