horzcat.m

来自「非线型因素分析matlab仿真程序包」· M 代码 · 共 23 行

function c = horzcat(a, b)
% HORZCAT concatenate two probdist_alpha objects horizontally
%
% Arrays of probdist_alphas are made by composing such arrays of respective
% subcomponents.

% Copyright (C) 1999-2000 Antti Honkela, Harri Valpola,
% and Xavier Giannakopoulos.
%
% 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)
  c = a;
else
  c = probdist_alpha([get(a, 'E') get(b, 'E')], ...
		     [get(a, 'Var') get(b, 'Var')], ...
		     [a.malpha b.malpha], [a.valpha b.valpha], ...
		     [a.msign b.msign], [a.vsign b.vsign]);
end