wolffd@0: function T = som_table_print(sTable,fid,fmt)
wolffd@0: 
wolffd@0: %SOM_TABLE_PRINT Print a table to a file / standard output.
wolffd@0: %  
wolffd@0: % som_table_print(sTable,[fid],[fmt])
wolffd@0: %  
wolffd@0: %  som_table_print(sTable)
wolffd@0: %  som_table_print(sTable,fid,'html')
wolffd@0: %
wolffd@0: %  Input and output arguments ([]'s are optional): 
wolffd@0: %   sTable      (struct) a table struct (see SOM_TABLE_STRUCT)
wolffd@0: %   [fid]       (scalar) a file id (from FOPEN, for example)
wolffd@0: %               (empty)  by default standard output (fid=1) is used
wolffd@0: %   [fmt]       (string) 'txt' (default), 'ps', 'pdf' or 'html'
wolffd@0: %                        the output format type
wolffd@0: %
wolffd@0: % See also  SOM_TABLE_STRUCT, SOM_STATS_TABLE, SOM_STATS_REPORT.
wolffd@0: 
wolffd@0: % Contributed to SOM Toolbox 2.0, January 2nd, 2002 by Juha Vesanto
wolffd@0: % Copyright (c) by Juha Vesanto
wolffd@0: % http://www.cis.hut.fi/projects/somtoolbox/
wolffd@0: 
wolffd@0: % Version 2.0beta juuso 020102
wolffd@0: 
wolffd@0: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
wolffd@0: 
wolffd@0: if nargin<2 | isempty(fid) | isnan(fid), fid = 1; end
wolffd@0: if nargin<3 | isempty(fmt) | isnan(fmt), fmt = 'txt'; end
wolffd@0: 
wolffd@0: rowlines = 0; 
wolffd@0: longtable = 0; 
wolffd@0: 
wolffd@0: T = rep_utils({'inserttable',sTable,rowlines,longtable},fmt,fid);
wolffd@0: 
wolffd@0: return;
wolffd@0: 
wolffd@0: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%