Import data

# csv file

tuition_cost <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/main/data/2020/2020-03-10/tuition_cost.csv')

tuition_income <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/main/data/2020/2020-03-10/tuition_income.csv') 

salary_potential <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/main/data/2020/2020-03-10/salary_potential.csv')

Apply the following dplyr verbs to your data

Filter rows

filter(tuition_cost, out_of_state_tuition >30000, in_state_tuition >10000)

Arrange rows

arrange(salary_potential, desc(state_name), desc(name))

Select columns

tuition_cost %>% select(1,3)

Add columns

Summarize by groups