<span class="op">}</span><span class="op">)</span>

<span class="co"># remove any sample with no cells</span>
<span class="va">E</span> <span class="op">=</span> <span class="va">E</span><span class="op">[</span><span class="fu"><a href="https://rdrr.io/r/base/lapply.html">sapply</a></span><span class="op">(</span><span class="va">E</span>, <span class="va">ncol</span><span class="op">)</span> <span class="op">&gt;</span> <span class="fl">0</span><span class="op">]</span>

<span class="co"># merge into a si