Mercurial > hg > camir-ismir2012
annotate toolboxes/FullBNT-1.0.7/graph/moralize.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 function [M, moral_edges] = moralize(G) |
| Daniel@0 | 2 % MORALIZE Ensure that for every child, all its parents are married, and drop directionality of edges. |
| Daniel@0 | 3 % [M, moral_edges] = moralize(G) |
| Daniel@0 | 4 |
| Daniel@0 | 5 M = G; |
| Daniel@0 | 6 n = length(M); |
| Daniel@0 | 7 for i=1:n |
| Daniel@0 | 8 fam = family(G,i); |
| Daniel@0 | 9 M(fam,fam)=1; |
| Daniel@0 | 10 end |
| Daniel@0 | 11 M = setdiag(M,0); |
| Daniel@0 | 12 moral_edges = sparse(triu(max(0,M-G),1)); |