s="r-out co"><span class="r-pr">#&gt;</span>   D       0   0   0   0     0</span>
<span class="r-out co"><span class="r-pr">#&gt;</span>   other   0   0   0   0   200</span>
<span class="r-in"><span></span></span>
<span class="r-in"><span><span class="co"># return a data frame with small values replaced with zero</span></span></span>
<span class="r-in"><span><span class="fu">sum_lump</span><span class="op">(</span><span class="va">m</span>, threshold <span class="op">=</span> <span class="fl">80</span>, com