working on bug from updated dplyr