Package obitools :: Package distances :: Module r
[hide private]
[frames] | no frames]

Source Code for Module obitools.distances.r

 1  import sys 
 2   
 3  from itertools import imap,count 
 4   
5 -def writeRMatrix(matrix):
6 names = [x.id for x in matrix.aligment] 7 lmax = max(max(len(x) for x in names),5) 8 lali = len(matrix.aligment) 9 10 nformat = '%%-%ds' % lmax 11 dformat = '%%%d.4f' % lmax 12 13 pnames=[nformat % x for x in names] 14 15 rep = [' '.join(pnames)] 16 17 for i in xrange(lali): 18 line=[] 19 for j in xrange(lali): 20 line.append('%5.4f' % matrix[(j,i)]) 21 rep.append(' '.join(line)) 22 return '\n'.join(rep)
23