diff --git a/tables/convert_tables_to_xlsx.r b/tables/convert_tables_to_xlsx.r
index 256e0d6..1a71630 100644
--- a/tables/convert_tables_to_xlsx.r
+++ b/tables/convert_tables_to_xlsx.r
@@ -7,6 +7,7 @@ load_csvs <- function(filenames) {
   table_list <- list()
   
   descriptions <- data.table()
+  message('filename')
   
   for (filename in filenames) {
     file_id <- gsub('.*/(.*)\\.csv','\\1', filename)
@@ -17,7 +18,6 @@ load_csvs <- function(filenames) {
     
     table_list[[file_id]] <- table
   }
-  
   table_list <- c(list('descriptions'=descriptions), table_list)
   
   return(table_list)
diff --git a/tables/fig7d_survival.csv b/tables/fig7d_survival.csv
new file mode 100644
index 0000000..8d8c225
--- /dev/null
+++ b/tables/fig7d_survival.csv
@@ -0,0 +1,46 @@
+"# MMS1 Survival Data : Fig 7D, S7E"
+day,donor,BB CD28,BB 41BB,BB BAFFR,TRAC
+100,1,0,,,
+100,1,0,,,
+49,1,1,,,
+76,1,1,,,
+76,1,1,,,
+74,1,1,,,
+60,1,,1,,
+58,1,,1,,
+88,1,,1,,
+58,1,,1,,
+98,1,,1,,
+84,1,,1,,
+100,1,,,0,
+59,1,,,1,
+100,1,,,0,
+100,1,,,0,
+93,1,,,1,
+91,1,,,1,
+50,1,,,,1
+50,1,,,,1
+50,1,,,,1
+45,1,,,,1
+50,1,,,,1
+45,1,,,,1
+50,1,,,,1
+45,1,,,,1
+47,2,1,,,
+47,2,1,,,
+47,2,1,,,
+52,2,1,,,
+52,2,1,,,
+70,2,1,,,
+54,2,1,,,
+47,2,1,,,
+77,2,1,,,
+49,2,,1,,
+64,2,,1,,
+82,2,,1,,
+47,2,,1,,
+70,2,,1,,
+47,2,,,1,
+81,2,,,1,
+74,2,,,1,
+67,2,,,1,
\ No newline at end of file
diff --git a/tables/supp_raw_data.xlsx b/tables/supp_raw_data.xlsx
index ed2e246..e4c12a2 100644
Binary files a/tables/supp_raw_data.xlsx and b/tables/supp_raw_data.xlsx differ
diff --git a/tables/~$supp_raw_data.xlsx b/tables/~$supp_raw_data.xlsx
new file mode 100644
index 0000000..59bc150
Binary files /dev/null and b/tables/~$supp_raw_data.xlsx differ