wolffd@0
|
1 function engine = belprop_mrf2_inf_engine(mrf2, varargin)
|
wolffd@0
|
2 % BELPROP_MRF2_INF_ENGINE Belief propagation for MRFs with discrete pairwise potentials
|
wolffd@0
|
3 % engine = belprop_mrf2_inf_engine(mrf2, ...)
|
wolffd@0
|
4 %
|
wolffd@0
|
5 % This is like belprop_inf_engine, except it is designed for mrf2, so is much faster.
|
wolffd@0
|
6 %
|
wolffd@0
|
7 % [ ... ] = belprop_mrf2_inf_engine(..., 'param1',val1, 'param2',val2, ...)
|
wolffd@0
|
8 % allows you to specify optional parameters as name/value pairs.
|
wolffd@0
|
9 % Parameters modifying behavior of enter_evidence are below [default value in brackets]
|
wolffd@0
|
10 %
|
wolffd@0
|
11 % max_iter - max. num. iterations [ 5*nnodes]
|
wolffd@0
|
12 % momentum - weight assigned to old message in convex combination
|
wolffd@0
|
13 % (useful for damping oscillations) [0]
|
wolffd@0
|
14 % tol - tolerance used to assess convergence [1e-3]
|
wolffd@0
|
15 % verbose - 1 means print error at every iteration [0]
|
wolffd@0
|
16 %
|
wolffd@0
|
17 % Parameters can be changed later using set_params
|
wolffd@0
|
18
|
wolffd@0
|
19
|
wolffd@0
|
20 % The advantages of pairwise potentials are
|
wolffd@0
|
21 % (1) we can compute messages using vector-matrix multiplication
|
wolffd@0
|
22 % (2) we can easily specify the parameters: one potential per edge
|
wolffd@0
|
23 % In contrast, potentials on larger cliques are more complicated to deal with.
|
wolffd@0
|
24
|
wolffd@0
|
25
|
wolffd@0
|
26 nnodes = length(mrf2.adj_mat);
|
wolffd@0
|
27
|
wolffd@0
|
28 [engine.max_iter, engine.momentum, engine.tol, engine.verbose] = ...
|
wolffd@0
|
29 process_options(varargin, 'max_iter', [], 'momentum', 0, 'tol', 1e-3, ...
|
wolffd@0
|
30 'verbose', 0);
|
wolffd@0
|
31
|
wolffd@0
|
32 if isempty(engine.max_iter) % no user supplied value, so compute default
|
wolffd@0
|
33 engine.max_iter = 5*nnodes;
|
wolffd@0
|
34 %if acyclic(mrf2.adj_mat, 0) --- can be very slow!
|
wolffd@0
|
35 % engine.max_iter = nnodes;
|
wolffd@0
|
36 %else
|
wolffd@0
|
37 % engine.max_iter = 5*nnodes;
|
wolffd@0
|
38 %end
|
wolffd@0
|
39 end
|
wolffd@0
|
40
|
wolffd@0
|
41 engine.bel = cell(1, nnodes); % store results of enter_evidence here
|
wolffd@0
|
42 engine.mrf2 = mrf2;
|
wolffd@0
|
43
|
wolffd@0
|
44 engine = class(engine, 'belprop_mrf2_inf_engine');
|
wolffd@0
|
45
|
wolffd@0
|
46
|