From 0a9fe6e53ce533bc01bec140e2ab9a44994d4913 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Miguel=20=C3=81lvarez=20Herrera?= Date: Wed, 17 Apr 2024 10:03:47 +0200 Subject: [PATCH] Remove extra table check messages --- workflow/scripts/report/NV_description.R | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/workflow/scripts/report/NV_description.R b/workflow/scripts/report/NV_description.R index 3688910..bfb6e0e 100644 --- a/workflow/scripts/report/NV_description.R +++ b/workflow/scripts/report/NV_description.R @@ -160,7 +160,6 @@ npc <- read_csv(snakemake@params[["nsp"]]) %>% ## SUMMARY FIGURE FOR WHOLE GENOME log_info("Plotting summary figure for whole genome") -log_info("Checking table size") if (nrow(vcf) == 0) { log_warn("Whole-genome VCF has no rows") vcf <- empty_vcf @@ -315,14 +314,11 @@ window_plot_spike <- window %>% x = "" ) -log_info("Checking table size") if (nrow(vcf_spike) == 0) { - log_warn("Spike VCF has no rows!") + log_warn("Spike VCF has no rows") vcf_spike <- empty_vcf } -log_info(vcf_spike$NV_class) - variants_spike <- vcf_spike %>% ggplot() + aes( @@ -387,7 +383,6 @@ figur_SNP_table <- vcf_snp %>% ) %>% ungroup() -log_info("Checking table size") if (nrow(figur_SNP_table) == 0) { log_warn("Filtered SNP table has no rows") figur_SNP_table <- empty_vcf