Daniel@0: %bnet = mk_motif_hhmm('motif_pattern', 'acca', 'background', 't');
Daniel@0: bnet = mk_motif_hhmm('motif_pattern', 'accaggggga', 'background', []);
Daniel@0: 
Daniel@0: chars = ['a', 'c', 'g', 't'];
Daniel@0: Tmax = 100;
Daniel@0: 
Daniel@0: for seqi=1:5
Daniel@0:   evidence = cell2num(sample_dbn(bnet, 'length', Tmax));
Daniel@0:   chars(evidence(end,:))
Daniel@0: end