sequences:nths:

USING: kernel ;
IN: sequences

: nths ( indices  seq -- seq' ) [ nth ] curry map ;