pan class="va">inv</span> <span class="op">&lt;-</span>  <span class="op">-</span><span class="va">pcors</span></span></span>
<span class="r-in"><span><span class="fu"><a href="https://rdrr.io/r/base/diag.html" class="external-link">diag</a></span><span class="op">(</span><span class="va">inv</span><span class="op">)</span> <span class="op">&lt;-</span> <span class="fl">1</span></span></span>
<span class="r-in"><span><span class="va">cors</span> <span class="op">&lt;-</span> <span class="fu"><a href="https: