Mercurial > hg > camir-aes2014
comparison toolboxes/FullBNT-1.0.7/bnt/inference/dynamic/@frontier_inf_engine/enter_evidence.m @ 0:e9a9cd732c1e tip
first hg version after svn
author | wolffd |
---|---|
date | Tue, 10 Feb 2015 15:05:51 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:e9a9cd732c1e |
---|---|
1 function [engine, loglik] = enter_evidence(engine, evidence, varargin) | |
2 % ENTER_EVIDENCE Add the specified evidence to the network (frontier) | |
3 % [engine, loglik] = enter_evidence(engine, evidence, ...) | |
4 % | |
5 % evidence{i,t} = [] if if X(i,t) is hidden, and otherwise contains its observed value (scalar or column vector) | |
6 % | |
7 % The following optional arguments can be specified in the form of name/value pairs: | |
8 % [default value in brackets] | |
9 % | |
10 % maximize - if 1, does max-product (not yet supported), else sum-product [0] | |
11 % filter - if 1, do filtering, else smoothing [0] | |
12 % | |
13 % e.g., engine = enter_evidence(engine, ev, 'maximize', 1) | |
14 | |
15 maximize = 0; | |
16 filter = 0; | |
17 | |
18 % parse optional params | |
19 args = varargin; | |
20 nargs = length(args); | |
21 if nargs > 0 | |
22 for i=1:2:nargs | |
23 switch args{i}, | |
24 case 'maximize', maximize = args{i+1}; | |
25 case 'filter', filter = args{i+1}; | |
26 otherwise, | |
27 error(['invalid argument name ' args{i}]); | |
28 end | |
29 end | |
30 end | |
31 | |
32 assert(~maximize); | |
33 | |
34 [ss T] = size(evidence); | |
35 bnet = bnet_from_engine(engine); | |
36 onodes = find(~isemptycell(evidence)); | |
37 cnodes = unroll_set(bnet.cnodes(:), ss, T); | |
38 pot_type = determine_pot_type(bnet, onodes); | |
39 | |
40 CPDpot = convert_dbn_CPDs_to_pots(bnet, evidence, pot_type); | |
41 | |
42 [engine.fwdback, loglik, engine.fwd_frontier, engine.back_frontier] = ... | |
43 enter_soft_evidence(engine, CPDpot, onodes, pot_type, filter); | |
44 |