</span>
<span class='r-in'></span>
<span class='r-in'><span class='co'># mle given the graph</span></span>
<span class='r-in'><span class='fu'>mle_known_graph</span><span class='op'>(</span><span class='fu'><a href='https://rdrr.io/r/stats/cor.html'>cor</a></span><span class='op'>(</span><span class='va'>y</span><span class='op'>)</span>, <span class='va'>adj_new</span><span class='op'>)</span></span>
<span class='r-out co'><span class='r-pr'>#&gt;</span> $Theta</span>
<span class='r-out co'><span class='r-