I'm looking to report the min, max, and mean of certain columns (`price`, `age`, and `dist`)from the `houses` data set using pipes in a concise tibble. For now, I have the following code which produces a rather inelegant solution with a 1x9 tibble:

```
houses %>% 
  select(price, age, dist) %>%
  summarize_each(list(min = min, max = max, mean = mean))

```

I was hoping to create a more organized solution using pipes with the selected data as rows and the summary stats (min, max, mean) as columns resulting in a 3x3 tibble. Any ideas?