Chapter 37 Chipotle business

We explore the various Chipotle business

chipotle_biz = business %>%
  filter(str_detect(name,"Chipotle") )%>%
  arrange(desc(review_count,stars))

datatable(head(chipotle_biz), style="bootstrap", class="table-condensed", options = list(dom = 'tp',scrollX = TRUE))