kth-object ( seq k quot: ( x y -- ? ) -- elt )

Vocabulary
math.statistics

Definition

USING: kernel math.statistics.private sequences ;

IN: math.statistics

: kth-object ( seq k quot: ( x y -- ? ) -- elt )
    [ [ nth ] [ exchange ] ] dip (kth-object) ; inline