📄 bic_score_cpd.m
字号:
function score = BIC_score_CPD(CPD, fam, data, ns, cnodes)% BIC_score_CPD Compute the BIC score of a generic CPD% score = BIC_score_CPD(CPD, fam, data, ns, cnodes)%% We assume this node has a maximize_params methodncases = size(data, 2);CPD = reset_ess(CPD);% make a fully observed joint distribution over the familyfmarginal.domain = fam;fmarginal.T = 1;fmarginal.mu = [];fmarginal.Sigma = [];if ~iscell(data) cases = num2cell(data);else cases = data;endfor m=1:ncases CPD = update_ess(CPD, fmarginal, cases(:,m), ns, cnodes);endCPD = maximize_params(CPD);self = fam(end);ps = fam(1:end-1);L = log_prob_node(CPD, cases(self,:), cases(ps,:));score = L - 0.5*CPD.nparams*log(ncases);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -