Are you looking for something like this? (define (tr2 k n) (build-list k (lambda (x) (random n)))) ;; the x arg is unused (it counts up)
rac On Aug 18, 2012, at 10:59 PM, Ian Tegebo wrote: > (define (call-n-times f n) > (define (helper f n lst) > (if (< n 1) > lst > (helper f (- n 1) (cons (f) lst)))) > (helper f n '())) > > (define (take-randoms k n) > (call-n-times (curry random n) k)) ____________________ Racket Users list: http://lists.racket-lang.org/users
