R package for drawing samples