s='kw'>function</span>(<span class='no'>r</span>) {
    <span class='fu'><a href='https://rdrr.io/r/base/list.html'>list</a></span>(<span class='kw'>x</span> <span class='kw'>=</span> <span class='no'>x</span>[<span class='no'>r</span>], <span class='kw'>y</span> <span class='kw'>=</span> <span class='no'>y</span>[<span class='no'>r</span>,], <span class='kw'>z</span> <span class='kw'>=</span> <span class='no'>z</span>[<span class='no'>r</span>,,])
  })

  <span class='no'>ls</span> <span class='kw'>&lt;-</