# HG changeset patch
# User greg
# Date 1570214613 14400
# Node ID 43d00c21b135431ed84cb28a38deb3dbf62ef8e9
# Parent  9d0ddd9d62c566d45cd931a45422bc7d279850be
Uploaded

diff -r 9d0ddd9d62c5 -r 43d00c21b135 coral_multilocus_genotype.R
--- a/coral_multilocus_genotype.R	Fri Oct 04 08:47:10 2019 -0400
+++ b/coral_multilocus_genotype.R	Fri Oct 04 14:43:33 2019 -0400
@@ -579,7 +579,7 @@
 # stag_db_report for the charts (user_specimen_id names
 # will be used to label each chart).
 start_time <- time_start("Creating percent_breakdown.pdf");
-stag_db_report_data_table <- stag_db_report[c(-2, -3, -4,-5,-6)];
+stag_db_report_data_table <- stag_db_report[c(-2, -3, -4, -5)];
 # Remove NA and NaN values.
 stag_db_report_data_table <- na.omit(stag_db_report_data_table);
 # Translate to N (i.e., number of samples with a genotype)