rm[[z]]) <span class="sc">*</span> abundance[z]  </span>
<span id="cb6-69"><a href="#cb6-69" aria-hidden="true" tabindex="-1"></a>  }</span>
<span id="cb6-70"><a href="#cb6-70" aria-hidden="true" tabindex="-1"></a>  expected_abund <span class="ot">&lt;-</span> (lambda <span class="sc">*</span> (num) <span class="sc">/</span> term) <span class="sc">*</span> abundance[<span class="fu">names</span>(lambda)]</span>
<span id="cb6-71"><a href="#cb6-71" aria-hidden="true" tabindex="-1"></a>  expected_abund</span>
