Mercurial > repos > xuebing > sharplabtool
annotate tools/mytools/intervalSize.py @ 1:cdcb0ce84a1b
Uploaded
| author | xuebing |
|---|---|
| date | Fri, 09 Mar 2012 19:45:15 -0500 |
| parents | 9071e359b9a3 |
| children |
| rev | line source |
|---|---|
| 0 | 1 ''' |
| 2 plot histogram of interval size | |
| 3 ''' | |
| 4 | |
| 5 import os,sys | |
| 6 | |
| 7 inputfile = sys.argv[1] | |
| 8 outputfile = sys.argv[2] | |
| 9 | |
| 10 rf = open('tmp.r','w') | |
| 11 rf.write("x <- read.table('"+inputfile+"')\n") | |
| 12 rf.write("len <- x[,3]-x[,2]\n") | |
| 13 rf.write("pdf('"+outputfile+"')\n") | |
| 14 rf.write("hist(len,breaks=100,xlab='interval size',main=paste('mean=',mean(len),sep=''))\n") | |
| 15 rf.write("dev.off()") | |
| 16 rf.close() | |
| 17 os.system("R --vanilla < tmp.r") | |
| 18 os.system('rm tmp.r') |