annotate toolboxes/FullBNT-1.0.7/bnt/examples/dynamic/arhmm1.m @ 0:cc4b1211e677 tip

initial commit to HG from Changeset: 646 (e263d8a21543) added further path and more save "camirversion.m"
author Daniel Wolff
date Fri, 19 Aug 2016 13:07:06 +0200
parents
children
rev   line source
Daniel@0 1 % Make an HMM with autoregressive Gaussian observations (switching AR model)
Daniel@0 2 % X1 -> X2
Daniel@0 3 % | |
Daniel@0 4 % v v
Daniel@0 5 % Y1 -> Y2
Daniel@0 6
Daniel@0 7 seed = 0;
Daniel@0 8 rand('state', seed);
Daniel@0 9 randn('state', seed);
Daniel@0 10
Daniel@0 11 intra = zeros(2);
Daniel@0 12 intra(1,2) = 1;
Daniel@0 13 inter = zeros(2);
Daniel@0 14 inter(1,1) = 1;
Daniel@0 15 inter(2,2) = 1;
Daniel@0 16 n = 2;
Daniel@0 17
Daniel@0 18 Q = 2; % num hidden states
Daniel@0 19 O = 2; % size of observed vector
Daniel@0 20
Daniel@0 21 ns = [Q O];
Daniel@0 22 dnodes = 1;
Daniel@0 23 onodes = [2];
Daniel@0 24 bnet = mk_dbn(intra, inter, ns, 'discrete', dnodes, 'observed', onodes);
Daniel@0 25
Daniel@0 26 bnet.CPD{1} = tabular_CPD(bnet, 1);
Daniel@0 27 bnet.CPD{2} = gaussian_CPD(bnet, 2);
Daniel@0 28 bnet.CPD{3} = tabular_CPD(bnet, 3);
Daniel@0 29 bnet.CPD{4} = gaussian_CPD(bnet, 4);
Daniel@0 30
Daniel@0 31
Daniel@0 32 T = 10; % fixed length sequences
Daniel@0 33
Daniel@0 34 engine = {};
Daniel@0 35 %engine{end+1} = hmm_inf_engine(bnet);
Daniel@0 36 engine{end+1} = jtree_unrolled_dbn_inf_engine(bnet, T);
Daniel@0 37 %engine{end+1} = smoother_engine(hmm_2TBN_inf_engine(bnet));
Daniel@0 38 %engine{end+1} = smoother_engine(jtree_2TBN_inf_engine(bnet));
Daniel@0 39
Daniel@0 40 inf_time = cmp_inference_dbn(bnet, engine, T, 'check_ll',1);
Daniel@0 41 learning_time = cmp_learning_dbn(bnet, engine, T, 'check_ll', 1);
Daniel@0 42