subsref.m

来自「MATLAB7.0课本所有程序清单,共37章,特别适合初学者,可以帮助节省大量时」· M 代码 · 共 11 行

function b = subsref(a,s)
% SUBSREF 
switch s.type
case '()'
    ind = s.subs{:};
    for k = 1:length(ind)
        b(k) = eval(strrep(char(a),'x',num2str(ind(k))));
    end
otherwise
   error('Specify value for x as p(x)')
end