slice_sample function

Wrapper around dplyr::slice_sample that prints information about the operation