homework 2 starter code

# directions: comment each line of code with:  
# 1) what package the function comes from
# 2) what the function does
# 3) how the data frame changes after running that function
data <- read.csv("Newman_etal_JAPPL_California_chaparral_birds_2017.csv") %>% 
  # 
  clean_names() %>% 
  # 
  mutate_all(tolower) %>% 
  #
  mutate(surv_date_stable = as_date(surv_date_stable)) %>% 
  #
  mutate(grow_year = as_factor(grow_year))