worked on tidydata data frame