diff --git a/webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd b/webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd
index 7610ed36ceb78c72819ebf26562671349551340e..eb1641453beca403e4f3c47b74622ca17cc07310 100644
--- a/webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd
+++ b/webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd
@@ -114,7 +114,7 @@ library(dplyr)
 # Take the relevant rows from the tables specified in inputs
 data_used <- list()
 for (i in 1:nrow(inputs)){ 
-  row_filepath <- file.path(here::here(), 'experiments',inputs$Data_type[i], inputs$Facility_name_mon_YYYY[i], inputs$Metadata_file[i]) 
+  row_filepath <- file.path(here::here(), 'experiments',inputs$Data_type[i], inputs$Facility_name_mon_YYYY[i], "metadata_tables", inputs$Metadata_file[i]) 
   data_used[[i]] <- read.csv(row_filepath) %>% filter(SubjectID == inputs$SubjectID[i]) # read table and filter subject
 }