s="r-out co"><span class="r-pr">#&gt;</span>    tau_ba </span>
<span class="r-out co"><span class="r-pr">#&gt;</span> 0.7995291 </span>
<span class="r-out co"><span class="r-pr">#&gt;</span> </span>
<span class="r-in"><span></span></span>
<span class="r-in"><span><span class="co"># vectorized by row</span></span></span>
<span class="r-in"><span><span class="va">tau_ba_v</span> <span class="op">&lt;-</span> <span class="kw">function</span><span class="op">(</span><span class="va">theta</span><span class="op"