cliptr_snn.m

神经网络的工具箱, 神经网络的工具箱,

function tr=cliptr_snn(tr,epochs)
%CLIPTR_SNN Clip training record to the final number of epochs.
%
% Syntax
%
%  tr = cliptr(tr,epochs)
%
% See also
%
%  TR_STRUCT_SNN
%

indices = 1:(epochs+1);
names = fieldnames(tr);
for i=1:prod(size(names))
%  next two lines equals this two:      
%  name = names{i};
%  eval(['tr.' name ' = tr.' name '(:,indices);']);
   cont = subsref(tr, substruct('.', names{i})); 
   tr = subsasgn(tr, substruct('.', names{i}), cont(:,indices));
end