l_b.m

麻省理工学院的人工智能工具箱,很珍贵,希望对大家有用!

function [dag,score]= L_B(data,ns,lis,pot_par,max_par)
[n ncases] = size(data);hecho=0;dag=zeros(n,n);
while hecho==0
   newlink=0;bp=[];
   %se busca el mejor enlace en toda la red
   for j=1:3
      j
      padres=lis(j,1:pot_par);
      ps=find(dag(:,j)==1)';
      pscoremax =-inf;%aqu