From c5be347c2446d57ccd236c688e767284ec25c166 Mon Sep 17 00:00:00 2001 From: Thomas Yu Date: Sat, 29 Jun 2024 18:21:52 -0700 Subject: [PATCH] Align text and table --- templates/dashboardTemplate.Rmd | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/templates/dashboardTemplate.Rmd b/templates/dashboardTemplate.Rmd index fc2c36e3..c18c8292 100644 --- a/templates/dashboardTemplate.Rmd +++ b/templates/dashboardTemplate.Rmd @@ -684,12 +684,12 @@ if (!is.null(assay_infodf) & !is.null(this_bed)) { num_submitted_genes = colSums(submitted_bool_per_panel) colnames(number_of_genes) = "num_genes_remapped" number_of_genes$num_genes_submitted = NA - number_of_genes$num_expected_genes = NA + number_of_genes$num_genes_expected = NA number_of_genes[names(num_submitted_genes), "num_genes_submitted"] = num_submitted_genes - number_of_genes[assay_infodf$SEQ_ASSAY_ID, "num_expected_genes"] = assay_infodf$number_of_genes + number_of_genes[assay_infodf$SEQ_ASSAY_ID, "num_genes_expected"] = assay_infodf$number_of_genes - different_from_expected = number_of_genes[c(which(number_of_genes$num_genes_remapped != number_of_genes$num_expected_genes), - which(is.na(number_of_genes$num_expected_genes))),] + different_from_expected = number_of_genes[c(which(number_of_genes$num_genes_remapped != number_of_genes$num_genes_expected), + which(is.na(number_of_genes$num_genes_expected))),] kable(different_from_expected, caption = "Number of submitted vs expected genes in a bed file") }