 <span class="va">trim</span><span class="op">)</span><span class="op">)</span></span></span>
<span class="r-in"><span><span class="va">f_S</span> <span class="op">&lt;-</span> <span class="kw">function</span><span class="op">(</span><span class="va">x</span>, <span class="va">calc_sd</span> <span class="op">=</span> <span class="cn">FALSE</span><span class="op">)</span> <span class="op">{</span></span></span>
<span class="r-in"><span>  <span class="kw">if</span> <span class="op">(</span><span class="va">ca