www.gusucode.com > mbcdesign 工具箱 matlab 源码程序 > mbcdesign/@designdev/info.m
function info(obj) %INFO % Copyright 2000-2011 The MathWorks, Inc. and Ford Global Technologies, Inc. level = count(obj); d = obj.design; % Format channel names nicely [names, units] = channelNames(obj, level); leadSpaces = ' Channel names : '; if length(names)>1 leadSpaces = char(leadSpaces, repmat(' ',length(names)-1,1)); end spaces = repmat(' (', length(names), 1); endBracket = repmat(')', length(names), 1); names = char(names); % Format model information modelChar = char(model(obj.design)); modelLeadSpaces = repmat(' ', size(modelChar, 1), 1); disp(' ') disp(['Level ' num2str(level) ' of DesignDev object :']) disp(' ') disp([' Design with ' num2str(nfactors(d)) ' factors and ' num2str(npoints(d)) ' points']); disp([ leadSpaces names spaces endBracket]); disp([' ' num2str(length(obj.constraints)) ' valid constraints']); disp( ' Modeled on :') disp([ modelLeadSpaces modelChar]); disp([' getConstraints function : ' i_callback2str(obj.getConstraints)]); disp([' modifyDesign function : ' i_callback2str(obj.modifyDesign)]); disp([' setDesignPoint function : ' i_callback2str(obj.setDesignPoint)]); disp([' runExperiment function : ' i_callback2str(obj.runExperiment)]); disp( ' Data :'); disp(obj.data); info(obj.next); function str = i_callback2str(callback) switch class(callback{1}) case 'char' str = callback{1}; case 'function_handle' str = func2str(callback{1}); end for i = 2:length(callback) switch class(callback{i}) case 'char' str = [str ' {' callback{i} '}']; case 'function_handle' str = [str ' {' func2str(callback{i}) '}']; end end