Codecademy Aggregates in R Calculating Aggregate Functions II 4/7

#Sample Solution
---
title: "Aggregates in R"
output: html_notebook
---

```{r message = FALSE}
# load packages
library(readr)
library(dplyr)
```

```{r message = FALSE}
# load orders data
orders <- read_csv("orders.csv")

# inspect orders
head(orders)
```

```{r}
# define shoe_counts here:
shoe_counts <- orders %>% group_by(shoe_type,shoe_color) %>% summarize(shoe_counts=n())
shoe_counts
```

```{r}
# define shoe_prices here:
shoe_prices <- orders %>% group_by(shoe_type,shoe_material) %>% summarize(shoe_prices=mean(price, na.rm=TRUE))
shoe_prices
```