```{r prepare-flights} nycflights <- nycflights13::flights
```{r filtered-flights, exercise.setup = "prepare-flights"}
# Prepare a filtered nycflights to select February rather than January
flights_february <- filter(nycflights, month == 2)
```{r arrange, exercise=TRUE, exercise.setup = "filtered-flights"}
arrange(flights_february, desc(arr_delay)) ```
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.