diff --git a/Data_files/phyloseq_output/Barplot_controls_combined_supfig2.tiff b/Data_files/phyloseq_output/Barplot_controls_combined_supfig2.tiff deleted file mode 100644 index d7d75d9e1f86c2eb28c244ea656e9760f29da3f4..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Barplot_controls_combined_supfig2.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Barplot_controls_combined_supfig2_23-11-20_144305.tiff b/Data_files/phyloseq_output/Barplot_controls_combined_supfig2_23-11-20_144305.tiff new file mode 100644 index 0000000000000000000000000000000000000000..3f3c3c2d31833f7fff8ba9514ef81b581cb664b3 Binary files /dev/null and b/Data_files/phyloseq_output/Barplot_controls_combined_supfig2_23-11-20_144305.tiff differ diff --git a/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3.tiff b/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3.tiff deleted file mode 100644 index 77428985835874c6f1962d3a587bc5ff68c2d9fc..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3_23-11-20_145318.tiff b/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3_23-11-20_145318.tiff new file mode 100644 index 0000000000000000000000000000000000000000..4642a313fc6c721752236e92f9d5248ee3711cbf Binary files /dev/null and b/Data_files/phyloseq_output/Class_absolute_ranking_Supfig3_23-11-20_145318.tiff differ diff --git a/Data_files/phyloseq_output/Class_ranking_Fig3.tiff b/Data_files/phyloseq_output/Class_ranking_Fig3.tiff deleted file mode 100644 index ef56baf5cfd96109404e18668041bea5cc682a83..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Class_ranking_Fig3.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Class_ranking_Fig3_23-11-20_145240.tiff b/Data_files/phyloseq_output/Class_ranking_Fig3_23-11-20_145240.tiff new file mode 100644 index 0000000000000000000000000000000000000000..d2b6f2b1e2aec47d04f6fe033e1eb2b56c156735 Binary files /dev/null and b/Data_files/phyloseq_output/Class_ranking_Fig3_23-11-20_145240.tiff differ diff --git a/Data_files/phyloseq_output/Fig1.tiff b/Data_files/phyloseq_output/Fig1.tiff index 28ddfbf61cd7af148919b7dbdb78f95ca6651ad2..4378b8716e1ed431d556566f4f75299a10e62c63 100644 Binary files a/Data_files/phyloseq_output/Fig1.tiff and b/Data_files/phyloseq_output/Fig1.tiff differ diff --git a/Data_files/phyloseq_output/Fig2.tiff b/Data_files/phyloseq_output/Fig2.tiff index 0cc8728ebb2eada0f770a7a8f0178570a39afd87..70e4f0400816e0eb005db83e087ee5d9cf122176 100644 Binary files a/Data_files/phyloseq_output/Fig2.tiff and b/Data_files/phyloseq_output/Fig2.tiff differ diff --git a/Data_files/phyloseq_output/Fig3.tiff b/Data_files/phyloseq_output/Fig3.tiff index 3e316172a50d71f95962427f0849f328542fc893..d2b6f2b1e2aec47d04f6fe033e1eb2b56c156735 100644 Binary files a/Data_files/phyloseq_output/Fig3.tiff and b/Data_files/phyloseq_output/Fig3.tiff differ diff --git a/Data_files/phyloseq_output/Fig4.tiff b/Data_files/phyloseq_output/Fig4.tiff index 585d4c03339307538192115caf31f4f5d0a44db6..bb26c81308ec5fdbc2c1bdcca3962d39874ad724 100644 Binary files a/Data_files/phyloseq_output/Fig4.tiff and b/Data_files/phyloseq_output/Fig4.tiff differ diff --git a/Data_files/phyloseq_output/FunGuild_combo_Fig2.tiff b/Data_files/phyloseq_output/FunGuild_combo_Fig2.tiff deleted file mode 100644 index 0d0dda1013c3e59633e36ab280ad3a22b8f2488e..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/FunGuild_combo_Fig2.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/FunGuild_combo_Fig2_23-11-20_151142.tiff b/Data_files/phyloseq_output/FunGuild_combo_Fig2_23-11-20_151142.tiff new file mode 100644 index 0000000000000000000000000000000000000000..70e4f0400816e0eb005db83e087ee5d9cf122176 Binary files /dev/null and b/Data_files/phyloseq_output/FunGuild_combo_Fig2_23-11-20_151142.tiff differ diff --git a/Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4.tiff b/Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4.tiff deleted file mode 100644 index 585d4c03339307538192115caf31f4f5d0a44db6..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4.tiff b/Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4_23-11-20_145314.tiff similarity index 56% rename from Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4.tiff rename to Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4_23-11-20_145314.tiff index 134fe2a6e7693443c4373d2910fe24d79f2bd2f6..bb26c81308ec5fdbc2c1bdcca3962d39874ad724 100644 Binary files a/Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4.tiff and b/Data_files/phyloseq_output/IsolateSeqs_ASVs_heatmap_Fig4_23-11-20_145314.tiff differ diff --git a/Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4_23-11-20_145310.tiff b/Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4_23-11-20_145310.tiff new file mode 100644 index 0000000000000000000000000000000000000000..1f2f6661060caeace6df2c8cc2cb6533b6920bad Binary files /dev/null and b/Data_files/phyloseq_output/IsolateSeqs_ASVs_ref_tree_Supfig4_23-11-20_145310.tiff differ diff --git a/Data_files/phyloseq_output/Overview_SupFig1.tiff b/Data_files/phyloseq_output/Overview_SupFig1.tiff deleted file mode 100644 index d8f894f1afd6c1c6a64ee15dfc76ea1918fb8bee..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Overview_SupFig1.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Overview_SupFig1_23-11-20_144443.tiff b/Data_files/phyloseq_output/Overview_SupFig1_23-11-20_144443.tiff new file mode 100644 index 0000000000000000000000000000000000000000..3ac19495db14d115da3c00de15fdb5ad0f366e63 Binary files /dev/null and b/Data_files/phyloseq_output/Overview_SupFig1_23-11-20_144443.tiff differ diff --git a/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree.tiff b/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree.tiff deleted file mode 100644 index a96b273f7170dc5e0deef08ba1df93cbac23ef85..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree_23-11-20_144441.tiff b/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree_23-11-20_144441.tiff new file mode 100644 index 0000000000000000000000000000000000000000..d44ec3e4089547be3fb9685779c6895fbc1a65d9 Binary files /dev/null and b/Data_files/phyloseq_output/Pos-ASVs_kontr-seqs_tree_23-11-20_144441.tiff differ diff --git a/Data_files/phyloseq_output/Topn_barplot_Fig1.tiff b/Data_files/phyloseq_output/Topn_barplot_Fig1.tiff deleted file mode 100644 index 28ddfbf61cd7af148919b7dbdb78f95ca6651ad2..0000000000000000000000000000000000000000 Binary files a/Data_files/phyloseq_output/Topn_barplot_Fig1.tiff and /dev/null differ diff --git a/Data_files/phyloseq_output/Topn_barplot_Fig1_23-11-20_152052.tiff b/Data_files/phyloseq_output/Topn_barplot_Fig1_23-11-20_152052.tiff new file mode 100644 index 0000000000000000000000000000000000000000..4378b8716e1ed431d556566f4f75299a10e62c63 Binary files /dev/null and b/Data_files/phyloseq_output/Topn_barplot_Fig1_23-11-20_152052.tiff differ diff --git a/SupMat2_DADA2_submission_FEMSEc.Rmd b/SupMat2_DADA2_submission_Frontiers.Rmd similarity index 100% rename from SupMat2_DADA2_submission_FEMSEc.Rmd rename to SupMat2_DADA2_submission_Frontiers.Rmd diff --git a/SupMat2_DADA2_submission_FEMSEc.pdf b/SupMat2_DADA2_submission_Frontiers.pdf similarity index 100% rename from SupMat2_DADA2_submission_FEMSEc.pdf rename to SupMat2_DADA2_submission_Frontiers.pdf diff --git a/SupMat3_Analysis_submission_FEMSEc.Rmd b/SupMat3_Analysis_submission_Frontiers.Rmd similarity index 98% rename from SupMat3_Analysis_submission_FEMSEc.Rmd rename to SupMat3_Analysis_submission_Frontiers.Rmd index deaa39a0cdc0cac4dc9f9888891f3f4c224b7aa3..759c5bb6b495297b236d031519059147bdab74ed 100644 --- a/SupMat3_Analysis_submission_FEMSEc.Rmd +++ b/SupMat3_Analysis_submission_Frontiers.Rmd @@ -299,10 +299,12 @@ pick_new_outgroup <- function(tree.unrooted){ # Generic save function for plots that checks whether file exists and if so, # creates a new one with d/m/y+time info to avoid overwriting. save_plot <- function(pl, filetype = ".tiff", plot_name = "my_plot"){ -name <- paste0("/",plot_name,filetype) -if (file.exists(paste0(outp, name))) { -name <- paste0("/", plot_name, "_", format(Sys.time(), "%d-%m-%y_%H%M%S"),filetype)} -ggsave(paste0(outp, name), pl, width = wp, height = hp, unit = "cm", dpi = res) + name <- paste0("/",plot_name,filetype) + if (file.exists(paste0(outp, name))) { + name <- paste0("/", plot_name, "_", format(Sys.time(), + "%d-%m-%y_%H%M%S"),filetype)} + ggsave(paste0(outp, name), pl, width = wp, height = hp, + unit = "cm", dpi = 300) } ################################################ @@ -611,9 +613,9 @@ taxlvltre <- "OTU" taxlvlbar <- "OTU" ##CHANGE ME to change the width (in cm) of the output. -wp <- 19 +wp <- 18 #CHANGE ME to change the height (in cm) of the output. -hp <- 22 +hp <- 20.8 #CHANGE ME to change the resolution (in dpi) of the output. res <- 150 @@ -656,9 +658,9 @@ This chunk generate a phylogenetic tree of the positive control sequences and AS ```{r tree_seqs_contr, tidy=FALSE} ## CHANGE ME to change the width (in cm) of the output. -wp <- 20 +wp <- 18 # CHANGE ME to change the height (in cm) of the output. -hp <- 15 +hp <- 13.5 real_contr <- refseq(ps.contr) seqs <- readDNAStringSet(file = "Data_files/Pos_contrseqs.fasta", @@ -696,9 +698,9 @@ This chunk generates an overview over read counts for all samples and additional ```{r Averages, tidy=FALSE} ## CHANGE ME to change the width (in cm) of the output. -wp = 20 +wp = 18 # CHANGE ME to change the height (in cm) of the output. -hp = 15 +hp = 13.5 # CHANGE ME to change the resolution (in dpi) of the output. res = 150 @@ -764,9 +766,9 @@ taxlvl2 <- "Genus" customLabels <- TRUE ## CHANGE ME to change the width (in cm) of the output. -wp <- 20 +wp <- 18 # CHANGE ME to change the height (in cm) of the output. -hp <- 15 +hp <- 15 # CHANGE ME to change the resolution (in dpi) of the output. res <- 150 @@ -864,7 +866,7 @@ colors_combo["Pythiogeton"] <- viridis_blues[2] colors_combo["Saprolegnia"] <- viridis_blues[4] #Format legend labels -if(customLabels){ +if (customLabels) { labelling_lvl2 <- c(expression(paste(italic("Spumella"), "-like")), "uncultured fungus", expression(italic("Aphanomyces"), italic("Globisporangium"), italic("Haptoglossa"), italic("Pedospumella"), @@ -881,7 +883,7 @@ names(enrich_labs) <- c("Before enrichment", "Enriched") theme_bar <- theme(legend.position = "bottom", legend.key.size = unit(0.4, "cm"), legend.spacing.x = unit(0.3, 'cm'), - text = element_text(size = 10), + text = element_text(size = 9), strip.text.x = element_text(size = 10), strip.background = element_blank(), axis.text.x = element_text(angle = 0, hjust = 0.5), @@ -935,8 +937,8 @@ cat("Chunk successfully run") This chunk imports the FUNGuild database based on code by [S. Faye Smith (2018)](https://rpubs.com/faysmith/metabarcoding), then classifies and plots all oomycete genera in the data set (Fig. 2). ```{r funguild_classification, tidy=FALSE} # Plot save dimensions -wp <- 20 -hp <- 15 +wp <- 18 +hp <- 13.5 res <- 150 # Adds formatted legend labels for the specific output in the manuscript. @@ -965,13 +967,15 @@ shared_theme <- theme(legend.key.size = unit(3, "mm"), legend.position = "none", axis.title.x = element_blank(), plot.margin = margin(20,10,10,10), - legend.text.align = 0) + legend.text.align = 0, + text = element_text(size = 10)) shared_theme_abu <- theme(legend.key.size = unit(3, "mm"), legend.position = "none", axis.title.x = element_blank(), plot.margin = margin(20,10,10,10), - legend.text.align = 0) + legend.text.align = 0, + text = element_text(size = 10)) #Format legend labels if(customLabels){ @@ -1027,7 +1031,7 @@ guilds <- ggarrange(guild_g, guild_g_abu, guild_s, guild_s_abu, nrow = 2, ncol = 2, common.legend = TRUE, legend = "right" ,align = "hv", labels = c("Genus level", "", "Species level", ""), - font.label = list(size = 14)) + font.label = list(size = 12)) guilds save_plot(guilds ,plot_name = "FunGuild_combo_Fig2") @@ -1279,8 +1283,8 @@ cat iso_and_ASVs_v3.fasta BLAST_ref_trim.fa > iso_ASVs_refs_v3.fasta ``` ```{r tree_seqs_Iso, tidy=FALSE} -wp <- 20 -hp <- 15 +wp <- 18 +hp <- 13.5 seqs <- readDNAStringSet(file = file.path(path,"iso_ASVs_refs_v3.fasta"), format = "fasta") diff --git a/SupMat3_Analysis_submission_FEMSEc.html b/SupMat3_Analysis_submission_Frontiers.html similarity index 100% rename from SupMat3_Analysis_submission_FEMSEc.html rename to SupMat3_Analysis_submission_Frontiers.html diff --git a/SupMat3_Analysis_submission_FEMSEc.pdf b/SupMat3_Analysis_submission_Frontiers.pdf similarity index 100% rename from SupMat3_Analysis_submission_FEMSEc.pdf rename to SupMat3_Analysis_submission_Frontiers.pdf