annotate r_wrapper.sh @ 37:16fe6233f90e draft

Uploaded
author davidvanzessen
date Fri, 08 Nov 2013 06:54:21 -0500
parents d26e8c208b5f
children 46c5d9d396a5
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
edcce37b28b8 Uploaded
davidvanzessen
parents:
diff changeset
1 #!/bin/bash
31
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
2 echo $1
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
3 echo $2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
4 echo $3
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
5
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
6 inputFile=$1
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
7 outputFile=$2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
8 outputDir=$3
0
edcce37b28b8 Uploaded
davidvanzessen
parents:
diff changeset
9 dir="$(cd "$(dirname "$0")" && pwd)"
31
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
10 mkdir $3
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
11 Rscript --verbose $dir/RScript.r $inputFile $outputDir $outputDir 2>&1
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
12 echo "<html>" >> $2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
13 echo "<img src='VPlot.png'/>" >> $2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
14 echo "<img src='DPlot.png'/>" >> $2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
15 echo "<img src='JPlot.png'/>" >> $2
12
ffcf8f90ad86 Uploaded
davidvanzessen
parents: 4
diff changeset
16
31
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
17 samples=`cat $outputDir/samples.txt`
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
18 count=1
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
19 echo "<table border='1'>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
20 for sample in $samples; do
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
21 echo "<tr><td colspan='3' height='100'></td>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
22 echo "<tr><td colspan='3'><h1>$sample</h1></td></tr>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
23 echo "<tr><td><h2>V-D Heatmap:</h2></td><td><h2>V-J Heatmap:</h2></td><td><h2>D-J Heatmap:</h2></td></tr><tr>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
24 mv "$outputDir/HeatmapVD_$sample.png" "$outputDir/VD_$sample.png"
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
25 echo "<td><img src='VD_$sample.png'/></td>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
26 mv "$outputDir/HeatmapVJ_$sample.png" "$outputDir/VJ_$sample.png"
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
27 echo "<td><img src='VJ_$sample.png'/></td>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
28 mv "$outputDir/HeatmapDJ_$sample.png" "$outputDir/DJ_$sample.png"
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
29 echo "<td><img src='DJ_$sample.png'/></td></tr>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
30 count=$((count+1))
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
31 done
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
32 echo "</table>" >> $outputFile
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
33
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
34 echo "</html>" >> $2
d26e8c208b5f Uploaded
davidvanzessen
parents: 21
diff changeset
35