diff --git a/code/03_TaxonomicBackbone.Rmd b/code/03_TaxonomicBackbone.Rmd
index fd8cf88b69ab1c219240b10e1217c3d1af6eb37c..229a3f1211123047d1e55154011ddd591471caac 100644
--- a/code/03_TaxonomicBackbone.Rmd
+++ b/code/03_TaxonomicBackbone.Rmd
@@ -838,11 +838,13 @@ tpl.ncbi <- read_csv("../_derived/TPL/tpl_results_iter4.csv",
 tpl.ncbi.certain <- tpl.ncbi %>%
   filter(Plant.Name.Index==T)
 nrow(tpl.ncbi.certain)
+write_csv(tpl.ncbi.certain, path = "../_derived/TPL/tpl.ncbi.certain.csv")
 
 tpl.ncbi.uncertain <- tpl.ncbi %>%
   filter(Plant.Name.Index==F) %>%
   dplyr::select(Taxon)
 nrow(tpl.ncbi.uncertain)
+write_csv(tpl.ncbi.uncertain, path = "../_derived/TPL/tpl.ncbi.uncertain.csv")
 
 save(tpl.ncbi.certain, tpl.ncbi.uncertain, file="../_derived/TNRS_submit/tnrs.iter4.RData")
 ```