Mercurial > repos > drosofff > mississippi_gcc
changeset 6:241eb82a2e7b draft
Uploaded
| author | mvdbeek |
|---|---|
| date | Tue, 24 Jun 2014 09:50:42 -0400 |
| parents | 457746c01695 |
| children | f777cbc82f98 |
| files | mississippi_gcc/size_histogram.xml |
| diffstat | 1 files changed, 200 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/mississippi_gcc/size_histogram.xml Tue Jun 24 09:50:42 2014 -0400 @@ -0,0 +1,200 @@ +<tool id="Size_histogram" name="Generate size histograms from alignment files" version="0.9.0"> + <description>from sRbowtie aligment</description> + <requirements><requirement type='package'>bowtie-inspect</requirement></requirements> + <parallelism method="basic"></parallelism> +<command interpreter="python"> + size_histogram.py + #if $refGenomeSource.genomeSource == "history": + --reference_fasta ## sys.argv[2] + $refGenomeSource.ownFile ## index source + #else: + #silent reference= filter( lambda x: str( x[0] ) == str( $refGenomeSource.series[0].input.dbkey ), $__app__.tool_data_tables[ 'bowtie_indexes' ].get_fields() )[0][-1] + --reference_bowtie_index + $reference + #end if + --rcode + $plotCode + --output_size_distribution + $size_distribution_dataframe + --minquery + $minquery + --maxquery + $maxquery + --input + #for $i in $refGenomeSource.series + $i.input + #end for + --ext + #for $i in $refGenomeSource.series + $i.input.ext + #end for + --label + #for $i in $refGenomeSource.series + "$i.input.name" + #end for + --normalization_factor + #for $i in $refGenomeSource.series + $i.norm + #end for + #if $gff: + --gff + $gff + #end if + #if $global.value == 'yes': + --global_size + #end if + #if $collapsestrands.value == 'yes': + --collapse + #end if + +</command> + <inputs> + <conditional name="refGenomeSource"> + <param name="genomeSource" type="select" label="Will you select a reference genome from your history or use a built-in index?" help="Built-ins were indexed using default options"> + <option value="indexed">Use a built-in index</option> + <option value="history">Use one from the history</option> + </param> + <when value="indexed"> + <repeat name="series" title="Add alignment files"> + <param name="input" type="data" label="Select multiple alignments to parse"> + <validator type="dataset_metadata_in_data_table" table_name="bowtie_indexes" metadata_name="dbkey" metadata_column="0" message="database not set for this bowtie output. Select the database(=genome used for matching) manually, or select a reference fasta from your history."/> + </param> + <param name="norm" type="float" value="1" label="Indicate a normalization factor to compare multiple aligments"/> + </repeat> + </when> + <when value="history"> + <repeat name="series" title="Add alignment files"> + <param name="input" type="data" label="Select multiple alignments to parse"/> + <param name="norm" type="integer" value="1" label="Indicate a normalization factor to compare multiple aligments"/> + </repeat> + </when> + </conditional> + <param name="gff" type="data" optional="true" label="Optional: select a GFF to investigate regions of interest" help="GFF must match genome build"/> + <!-- <validator type="dataset_metadata_in_data_table" table_name="bowtie_indexes" metadata_name="dbkey" metadata_column="0" message="GFF database and alignment file databse do not match!"/> --> + <param name="global" type="select" label="Generate size distribution for each item, or generate a global alignment"> + <option value="no">for each item</option> + <option value="yes">global</option> + </param> + <param name="collapsestrands" type="select" label="Whether + and - reads should be collapsed or not"> + <option value="no">Do not collapse</option> + <option value="yes">Collapse + and - reads</option> + </param> + <param name="minquery" type="integer" size="3" value="18" label="Min size of reads to plot" help="'15' = 15 nucleotides"/> + <param name="maxquery" type="integer" size="3" value="28" label="Max size of reads to plot" help="'30' = 30 nucleotides"/> + <param name="title" type="text" size="15" value="Size distribution" label="Main Titles"/> + <param name="xlabel" type="text" size="15" value="Size in nucleotides" label="x axis label"/> + <param name="ylabel" type="text" size="15" value="Number of reads" label="y axis label"/> + <param name="rows_per_page" type="text" size="9" value="8" label="How many items to display per page?"> + <validator type="in_range" min="6" max="20" message="Select between 6 and 20 rows, as the readability will suffer otherwise."/> + </param> + </inputs> + <configfiles> + <configfile name="plotCode"> + ## Setup R error handling to go to stderr + options( show.error.messages=F, + error = function () { cat( geterrmessage(), file=stderr() ); q( "no", 1, F ) } ) + library(RColorBrewer) + library(lattice) + library(latticeExtra) + library(grid) + library(gridExtra) + ##cheetahtemplate data frame implementation + + size=read.delim("${size_distribution_dataframe}", header=T, row.names=NULL) + + n_samples=length(unique(size\$sample)) + genes=unique(levels(size\$gene)) + n_genes=length(genes) + + par.settings.size=list(layout.heights=list(top.padding=-1, bottom.padding=-3, strip = .75), fontsize = list(text=96/${rows_per_page}, points=8)) + smR.prepanel=function(x,y,...){; yscale=c(-max(abs(y)), max(abs(y)));list(ylim=yscale);} + + plot_size_distribution= function(df, ...) { + bc= barchart(count~as.factor(size)|factor(sample, levels=unique(sample))+gene, data = df, origin = 0, + horizontal=FALSE, + group=polarity, + stack=TRUE, + col=c('red', 'blue'), + strip = strip.custom(par.strip.text = list(cex = 0.5)), + cex=0.75, + scales=list(y=list(tick.number=4, rot=90, relation="free"), cex=0.75), + xlab = "readsize in nucleotides", + ylab = "${ylabel}", + main="${title}" , + as.table=TRUE, newpage = T, ...) + combineLimits(update(useOuterStrips(bc), layout=c(n_samples,${rows_per_page})), margin.x=F, margin.y=1) + } + + per_gene_size=lapply(genes, function(x) subset(size, gene==x)) + + global = "no" + #if $global.value == 'yes': + global = "yes" + #end if + + if (global=="no") { + options(warn=-1) + pdf(file="${size_PDF}", paper="special", height=11.69, width=8.2677*n_samples/4) + plot_size_distribution(size, par.settings=par.settings.size, prepanel=smR.prepanel) + } else { + pdf(file="${size_PDF}", paper="special", height=11.69, width=8.2677) + bc= barchart(count~as.factor(size)|factor(sample, levels=unique(sample)), data = size, origin = 0, + horizontal=FALSE, + group=polarity, + stack=TRUE, + col=c('red', 'blue'), + cex=0.75, + par.settings=list(fontsize = list(text=8, points=8)), + scales=list(y=list(tick.number=4, rot=90, relation="same"), cex=0.75), + xlab = "readsize in nucleotides", + ylab = "${ylabel}", + main="${title}" , as.table=TRUE, newpage = T, + aspect=0.5) + #layout=c(n_samples, ${rows_per_page})) + bc + } + devname=dev.off() + + </configfile> + </configfiles> + + <outputs> + <data format="tabular" name="size_distribution_dataframe" label="Size distributionn dataframe"/> + <data format="pdf" name="size_PDF" label="Size distribution"/> + </outputs> +<help> + +**What it does** + +Takes one or more alignment files (BAM, SAM or tabular bowtie output) as input and produces a histogram of read sizes, +where by default for each "chromosome" a histogram of read sizes is drawn. +Reads that map in sense are on the top (red), reads that map antisense are on the bottom (blue). + + +.. class:: warningmark + +'''TIP''' The input data can be produced using the sRbowtie tool. + +---- + +'''Example''' + +Query sequence:: +For a SAM file as the following: + + 5 16 2L_79 24393 255 17M * 0 0 CCTTCATCTTTTTTTTT IIIIIIIIIIIIIIIII XA:i:0 MD:Z:17 NM:i:0 + + 11 0 2R_1 12675 255 21M * 0 0 AAAAAAAACGCGTCCTTGTGC IIIIIIIIIIIIIIIIIIIII XA:i:0 MD:Z:21 NM:i:0 + + 2 16 2L_5 669 255 23M * 0 0 TGTTGCTGCATTTCTTTTTTTTT IIIIIIIIIIIIIIIIIIIIIII XA:i:0 MD:Z:23 NM:i:0 + +produce a plot like this: + +---- + +.. image:: static/images/size_histogram.png + :height: 800 + :width: 500 + +</help> +</tool>