static <A> L<A> getRandomPercent(L<A> l, double percent) {
  ret selectRandomUpTo(l, iround(percent/100*l(l)));
}