data(airbnb) airbnb %>% summarize(nlevels(neighborhood), min(price), max(price))
## nlevels(neighborhood) min(price) max(price) ## 1 43 10 1000