(define (pick-random-element R)
	(nth (rand (length R)) R))