From f630e7c245c0ee2092153d0dbefe5f526e8d8ca2 Mon Sep 17 00:00:00 2001
From: Francesco Sabatini <francesco.sabatini@idiv.de>
Date: Wed, 31 Jul 2019 11:38:33 +0200
Subject: [PATCH] Sinked additional output from 03_Backbone

---
 code/03_TaxonomicBackbone.Rmd | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/code/03_TaxonomicBackbone.Rmd b/code/03_TaxonomicBackbone.Rmd
index fd8cf88..229a3f1 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")
 ```
-- 
GitLab