size.m

来自「Nonlinear dynamical factor analysis Matl」· M 代码 · 共 24 行

function [s, varargout] = size(x, dim)
% SIZE calculate the size of a probdist object

% Copyright (C) 2002 Harri Valpola and Antti Honkela.
%
% This package comes with ABSOLUTELY NO WARRANTY; for details
% see License.txt in the program package.  This is free software,
% and you are welcome to redistribute it under certain conditions;
% see License.txt for details.

if nargin == 1
  s = size(x.e);
else
  s = size(x.e, dim);
end

nout = max(nargout,1)-1;
for i=1:nout,
  varargout(i) = {s(i+1)};
end
if nout > 0
  s = s(1);
end