draw_graph_test.m

来自「麻省理工学院的人工智能工具箱,很珍贵,希望对大家有用!」· M 代码 · 共 51 行

% TEST_LAYOUT       Script to test some bayesian net layouts
%

% Change History :
% Date		Time		Prog	Note
% 13-Apr-2000	10:40 PM	ATC	Created under MATLAB 5.3.1.29215a (R11.1)

% ATC = Ali Taylan Cemgil,
% SNN - University of Nijmegen, Department of Medical Physics and Biophysics
% e-mail : [e-mail] 

bnet = mk_asia_bnet;
draw_graph(bnet.dag);

% Make the following network (from Jensen (1996) p84 fig 4.17)
%    1
%  / | \
% 2  3  4
% |  |  |
% 5  6  7
%  \/ \/
%  8   9
% where all arcs point downwards

disp('plot directed')
clf;

N = 9;
dag = zeros(N,N);
dag(1,2)=1; dag(1,3)=1; dag(1,4)=1;
dag(2,5)=1; dag(3,6)=1; dag(4,7)=1;
dag(5,8)=1; dag(6,8)=1; dag(6,9)=1; dag(7,9) = 1;

draw_graph(dag);

pause
clf
disp('plot undirected')
udag = [dag+dag'];
draw_graph(udag);

pause
clf
disp('plot mixed')
mg = [dag];
mg(2,1) = 1; mg(8,5) = 1;
draw_graph(mg);