I realize that this fn in undocumented, but ``` (if sample (map-fn (subseq x 0 sample)) (map-fn x))) ``` is not what I'm expecting it to do when `sample` is provided.