How to efficiently sample sequences from a bed file using R?

Question

I need to sample sequences of differing length from a bed file (a file that privides the start and end coordinates of a sequence, and a category). For example, given the bed