+
−% FROMDATAINMAT Convert a saved data-array into an AO with a tsdata-object
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−%
+
−% FUNCTION:    fromDataInMAT
+
−%
+
−% DESCRIPTION: Convert a saved data-array into an AO with a tsdata-object
+
−%
+
−% CALL:        obj = fromLISO(obj, data-array, plist)
+
−%
+
−% PARAMETER:   data-array: data-array
+
−%              plist:      plist-object (must contain the filename)
+
−%
+
−% VERSION:     $Id: fromDataInMAT.m,v 1.8 2011/08/12 11:38:03 hewitson Exp $
+
−%
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−
+
−function objs = fromDataInMAT(obj, loadData, pli)
+
−  
+
−  VERSION = '$Id: fromDataInMAT.m,v 1.8 2011/08/12 11:38:03 hewitson Exp $';
+
−  
+
−  ii = obj.getInfo(class(obj), 'From MAT Data File');
+
−  
+
−  % Set the method version string in the minfo object
+
−  ii.setMversion([VERSION '-->' ii.mversion]);
+
−  
+
−  %%%%%%%%%%   Get default parameter list   %%%%%%%%%%
+
−  dpl = ii.plists();
+
−  pl  = applyDefaults(dpl, pli);
+
−  
+
−  % Get filename
+
−  filename = find(pli, 'filename');
+
−  [pathstr, f_name, ext] = fileparts(filename);
+
−  
+
−  pl = pset(pl, 'filename', [f_name ext]);
+
−  pl = pset(pl, 'filepath', pathstr);
+
−  
+
−  data_type = find (pl, 'type');
+
−  columns   = find (pl, 'columns');
+
−  fs        = find (pl, 'fs');
+
−  
+
−  objs = [];
+
−  
+
−  %%%%
+
−  if strcmpi(data_type, 'cdata')
+
−    fs = 1;
+
−  end
+
−  
+
−  % Then we try for a numerical data set in
+
−  % the first numerical field we come to
+
−  fnames = fieldnames(loadData);
+
−  for jj=1:length(fnames)
+
−    if isnumeric(loadData.(fnames{jj}))
+
−      % get the data from here
+
−      data = loadData.(fnames{jj});
+
−      
+
−      if isempty(columns)
+
−        columns = 1:size(data,2);
+
−      end
+
−      
+
−      if max(columns) > size(data,2)
+
−        error('### The stored variable [%s] doesn''t contain %d columns. It only contains %d columns.', fnames{jj}, max(columns), size(data,2));
+
−      end
+
−      
+
−      if isempty(fs)
+
−        
+
−        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−        %%%                       Create from x and y                       %%%
+
−        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−        
+
−        for kk=1:2:numel(columns)
+
−          
+
−          % Create an empty object.
+
−          obj = obj.initObjectWithSize(1,1);
+
−          
+
−          x = data(:, columns(kk));
+
−          y = data(:, columns(kk+1));
+
−          
+
−          switch lower(data_type)
+
−            case 'tsdata'
+
−              dataObj = tsdata(x, y);
+
−            case 'fsdata'
+
−              dataObj = fsdata(x, y);
+
−            case 'xydata'
+
−              dataObj = xydata(x, y);
+
−            case 'cdata'
+
−              error('### Should not happen');
+
−            otherwise
+
−              error('### unknown data type ''%s''', data_type);
+
−          end
+
−          
+
−          obj.data = dataObj;
+
−          
+
−          plh = pl.pset('columns', [columns(kk) columns(kk+1)]);
+
−          if isempty(pl.find('Name'))
+
−            plh.pset('Name', sprintf('%s_%d_%d', find(pl, 'filename'), columns(kk), columns(kk+1)));
+
−          end
+
−          
+
−          obj.addHistory(ii, plh, [], []);
+
−          
+
−          objs = [objs obj];
+
−          
+
−        end
+
−        
+
−      else
+
−        
+
−        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−        %%%                       Create from y and fs                      %%%
+
−        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−        
+
−        for kk=1:numel(columns)
+
−          
+
−          % Create an empty object.
+
−          obj = obj.initObjectWithSize(1,1);
+
−          
+
−          y = data(:, columns(kk));
+
−          
+
−          switch lower(data_type)
+
−            case 'tsdata'
+
−              dataObj = tsdata(y, fs);
+
−            case 'fsdata'
+
−              dataObj = fsdata(y, fs);
+
−            case 'xydata'
+
−              dataObj = xydata(y);
+
−            case 'cdata'
+
−              % Special case for cdata objects.
+
−              % If the user doesn't specify any columns then return only
+
−              % one AO with all the data. But if the user defines any
+
−              % columns then return for each column an AO
+
−              pl.removeKeys({'fs', 'xunits'});
+
−              if isempty(pl.find('columns'))
+
−                obj = obj.initObjectWithSize(1,1);
+
−                obj.data = cdata(data);
+
−                obj.name = pl.find('filename');
+
−                obj.addHistory(ii, pl, [], []);
+
−                objs = [objs obj];
+
−                break;
+
−              else
+
−                dataObj = cdata(data(:,columns));
+
−              end
+
−            otherwise
+
−              error('### unknown data type ''%s''', data_type);
+
−          end
+
−          
+
−          obj.data = dataObj;
+
−          
+
−          plh = pl.pset('columns', columns(kk));
+
−          if isempty(pl.find('Name'))
+
−            plh.pset('Name', sprintf('%s_%d', find(pl, 'filename'), columns(kk)));
+
−          end
+
−          
+
−          % add history
+
−          obj.addHistory(ii, plh, [], []);
+
−          
+
−          objs = [objs obj];
+
−        end
+
−        
+
−      end
+
−      
+
−      % set any object properties
+
−      objs.setObjectProperties(pl);
+
−      
+
−    end % End if the mat file contains numeric data
+
−  end % End loop over filenames
+
−  
+
−  
+
−end
+
−
+
−
+
−