# HG changeset patch
# User jdv
# Date 1520881485 14400
# Node ID 4b7d1bcf210cbc612e91ac716d3d39131ad0c063
# Parent 5c571ad2803ed8555faf9a805b322c3bb3de8ac5
planemo upload for repository https://github.com/jvolkening/galaxy-tools/tree/master/tools/nanopore_qc commit dfa6f9934da27ffddc4da6c16d97d4057662ef65
diff -r 5c571ad2803e -r 4b7d1bcf210c nanopore_qc.R
--- a/nanopore_qc.R Mon Dec 04 15:23:55 2017 -0500
+++ b/nanopore_qc.R Mon Mar 12 15:04:45 2018 -0400
@@ -143,6 +143,9 @@
d$num_events_template = as.numeric(as.character(d$num_events_template))
d$start_time = as.numeric(as.character(d$start_time))
}
+
+ # ignore 0-length reads
+ d <- d[d$sequence_length_template > 0,]
d$events_per_base = d$num_events_template/d$sequence_length_template
@@ -334,6 +337,7 @@
# make plots
flog.info(paste(sep = "", flowcell, ": plotting length histogram"))
len.lims <- quantile(d$sequence_length_template,c(0.01,0.99))
+ len.lims[1] <- max(1,len.lims[1])
p1 = ggplot(d, aes(x = sequence_length_template)) +
geom_histogram(bins = 200, fill="steelblue") +
diff -r 5c571ad2803e -r 4b7d1bcf210c nanopore_qc.xml
--- a/nanopore_qc.xml Mon Dec 04 15:23:55 2017 -0500
+++ b/nanopore_qc.xml Mon Mar 12 15:04:45 2018 -0400
@@ -71,6 +71,12 @@