Update Publication_page.qmd

webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd

@@ -151,7 +151,7 @@ for (i in 1:nrow(inputs)){
   # Preview image address ------------------------------------------------
   image_url <- file.path(repo_url_basepath,'experiments',inputs$Data_type[i], inputs$Facility_name_YYYY_month[i],'preview_images',tmp_tbl_scans$Preview_Image)
   
-  images_relativepath <- gsub(repo_url_basepath,file.path('..','..','experiments'),image_url)
+  images_relativepath <- gsub(repo_url_basepath,file.path('/..','..','experiments'),image_url)
 # add paths and HTML code 
     
  tmp_tbl_scans$Preview_Image <- paste0('<a href=\'', image_url,'\' target=\'_blank\'>',