plot labels solutions

plot-labels-solutions.R

# Plot Labels

Use the code chunk from above with `geom_text` (not the last one with `geom_label`). Do the following:

1. Add a title
2. Add a better y axis label
3. Remove the x axis label
4. Remove the legend (hint: use the `show.legend` argument again)

```{r}
ggplot(data = sleep_by_gender, 
       mapping = aes(x = gender, 
                     y = avg_sleep,
                     fill = gender)) +
  geom_col(show.legend = FALSE) +
  geom_text(aes(label = round(avg_sleep, 1)),
            vjust = 1.5,
            color = "white") +
  scale_fill_brewer(palette = "Dark2",
                    na.value = "blue") +
  scale_y_continuous(limits = c(0, 8),
                     breaks = c(0, 1, 2, 3, 4, 5, 6, 7, 8)) +
  labs(title = "Women sleep slightly more than men on average",
       y = "Hours of sleep per night",
       x = "")
```