knitr::opts_chunk$set(message = FALSE)
library(tidydatatutor)
library(dplyr)

mtcars %>% 
  select(mpg, cyl, hp) %>% 
  group_by(cyl) %>% 
  summarise(mean(hp))

See this pipeline in Tidy Data Tutor



seankross/tidydatatutor documentation built on Dec. 22, 2021, 11:16 p.m.