class="r-pr">#&gt;</span>   ..$ visit     : chr "visit"</span>
<span class="r-out co"><span class="r-pr">#&gt;</span>  - attr(*, "class")= chr "simaerep"</span>
<span class="r-in"><span></span></span>
<span class="r-in"><span><span class="co"># simaerep classic algorithm</span></span></span>
<span class="r-in"><span></span></span>
<span class="r-in"><span><span class="va">evrep</span> <span class="op">&lt;-</span> <span class="fu">simaerep</span><span class="op">(</span><span class="va">df_visit</span>, inf