sample function now wrapper around dplyr