annotate utilities/UTIL_printTabTable.m @ 38:c2204b18f4a2 tip

End nov big change
author Ray Meddis <rmeddis@essex.ac.uk>
date Mon, 28 Nov 2011 13:34:28 +0000
parents f233164f4c86
children
rev   line source
rmeddis@0 1 function UTIL_printTabTable(M, headers, format)
rmeddis@0 2 % printTabTable prints a matrix as a table with tabs
rmeddis@0 3 %headers are optional
rmeddis@0 4 %headers=strvcat('firstname', 'secondname')
rmeddis@38 5 % UTIL_printTabTable([1 2; 3 4],strvcat('a1','a2'));
rmeddis@0 6
rmeddis@0 7 if nargin<3
rmeddis@0 8 format='%g';
rmeddis@0 9 end
rmeddis@0 10
rmeddis@0 11 if nargin>1
rmeddis@0 12 [r c]=size(headers);
rmeddis@0 13 for no=1:r
rmeddis@0 14 fprintf('%s\t',headers(no,:))
rmeddis@0 15 end
rmeddis@0 16 fprintf('\n')
rmeddis@0 17 end
rmeddis@0 18
rmeddis@0 19 [r c]=size(M);
rmeddis@0 20
rmeddis@0 21 for row=1:r
rmeddis@0 22 for col=1:c
rmeddis@0 23 fprintf('%s',num2str(M(row,col),format))
rmeddis@0 24 if col<c
rmeddis@0 25 fprintf('\t')
rmeddis@0 26 end
rmeddis@0 27 end
rmeddis@0 28 fprintf('\n')
rmeddis@0 29 end
rmeddis@0 30