?? multipdf.m
字號:
function p = multipdf(x,theta)%MULTIPDF Multinomial probability density function.% p = multipdf(x,theta) returns the probabilities of % vector x, under the multinomial distribution% with parameter vector theta.%% Author: David Ross%--------------------------------------------------------% Check the arguments.%--------------------------------------------------------error(nargchk(2,2,nargin));% make sure theta is a vectorif ndims(theta) > 2 | all(size(theta) > 1) error('theta must be a vector');end% make sure x is of the appropriate sizeif ndims(x) > 2 | any(size(x) ~= size(theta)) error('columns of X must have same length as theta');end%--------------------------------------------------------% Main...%--------------------------------------------------------p = prod(theta .^ x);p = p .* factorial(sum(x)) ./ prod(factorial_v(x));%--------------------------------------------------------% Function factorial_v(x): computes the factorial function% on each element of x%--------------------------------------------------------function r = factorial_v(x)if size(x,2) == 1 x = x';endr = [];for y = x r = [r factorial(y)];end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -