added custom suffices

webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd

@@ -90,7 +90,9 @@ for (i in 1:nrow(inputs)){
   tmp_tbl_scans <- read.csv(row_filepath_scans) %>% filter(Subject_ID == inputs$Subject_ID[i])
   scans_used[[i]] <- full_join(x=mice_used[[i]],
                           y = tmp_tbl_scans,
-                          by=join_by("Subject_ID"),keep=FALSE)
+                          by=join_by("Subject_ID"),
+                          suffix = c('.mice','.scans'),
+                          keep=FALSE)
               
    
 }