# Define inputs
fastq_input <- system.file("extdata/small_R1.fq", package = "Rsearch")
reverse <- system.file("extdata/small_R2.fq", package = "Rsearch")
# Generate and display quality plot with both median and mean lines
qual_plots <- plot_base_quality(fastq_input = fastq_input,
reverse = reverse)
print(qual_plots)
# Generate and display quality plot without the plot title
qual_plots_wo_title <- plot_base_quality(fastq_input = fastq_input,
reverse = reverse,
plot_title = "")
print(qual_plots_wo_title)
# Generate a plot showing only the median quality line
qual_plots_median_only <- plot_base_quality(fastq_input = fastq_input,
reverse = reverse,
show_mean = FALSE)
print(qual_plots_median_only)
# Generate a plot showing only the mean quality line
qual_plots_mean_only <- plot_base_quality(fastq_input = fastq_input,
reverse = reverse,
show_median = FALSE)
print(qual_plots_mean_only)
Run the code above in your browser using DataLab