annotate toolboxes/FullBNT-1.0.7/bnt/general/shrink_obs_dims_in_table.m @ 0:e9a9cd732c1e
tip
first hg version after svn
author |
wolffd |
date |
Tue, 10 Feb 2015 15:05:51 +0000 |
parents |
|
children |
|
rev |
line source |
wolffd@0
|
1 function T2 = shrink_obs_dims_in_table(T1, dom, evidence)
|
wolffd@0
|
2 % SHRINK_OBS_DIMS_IN_TABLE Set observed dimensions to size 1
|
wolffd@0
|
3 % T2 = shrink_obs_dims_in_table(T1, dom, evidence)
|
wolffd@0
|
4 %
|
wolffd@0
|
5 % If 'T1' contains observed nodes, it will have 0s in the positions that are
|
wolffd@0
|
6 % inconsistent with the evidence. We now remove these 0s and set the corresponding dimensions to
|
wolffd@0
|
7 % size 1, to be consistent with the way most inference engines handle evidence, which is to
|
wolffd@0
|
8 % shrink observed nodes before doing inference.
|
wolffd@0
|
9
|
wolffd@0
|
10 % This is used by pearl and enumerative inf. engines.
|
wolffd@0
|
11
|
wolffd@0
|
12 odom = dom(~isemptycell(evidence(dom)));
|
wolffd@0
|
13 vals = cat(1,evidence{odom});
|
wolffd@0
|
14 ndx = mk_multi_index(length(dom), find_equiv_posns(odom, dom), vals(:));
|
wolffd@0
|
15 T2 = T1(ndx{:});
|