aanpassing zodat code enkel als kronatools geïnstalleerd is wordt uit…

…gevoerd
inbo · Feb 21, 2024 · f632790 · f632790
1 parent 87bf17f
commit f632790
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/source/rmarkdown/annelida_data_analyse.Rmd b/source/rmarkdown/annelida_data_analyse.Rmd
@@ -260,7 +260,11 @@ sample_data(physeq_rarefied)$Landgebruik_MBAG_diepte <- combined_column
 physeq_rarefied <- merge_phyloseq(physeq_rarefied, sample_data(physeq_rarefied))
 
 
-psadd::plot_krona(physeq_rarefied, "MBAG_Olig01_Annelida_rar_species_alle_stalen_Landgebruik_MBAG_per_diepte", "Landgebruik_MBAG_diepte", trim = T)
+if (system(command = "which ktImportText",  intern = FALSE, ignore.stderr = TRUE,  ignore.stdout = TRUE) != 1) {
+  psadd::plot_krona(physeq_rarefied, "MBAG_Olig01_Annelida_rar_species_alle_stalen_Landgebruik_MBAG_per_diepte", "Landgebruik_MBAG_diepte", trim = T)
+}
+
+
 
 ```