add column in sample information

webpage_contents/publications/20240901_Marta_GironaAlarcon/Publication_page.qmd

@@ -85,6 +85,7 @@ for (i in 1:nrow(inputs)){
 # Gather list elements in a table 
 data_used <- do.call(rbind,data_used) 
 data_used$Subject_pubID <- inputs$Subject_pubID # Add additional input column 
+data_used$correction_factor <- inputs$Correction_factor # Add additional input column
 
 # add the subject index for publication as first variable
 data_used <- relocate(data_used, Subject_pubID, .before = 1)