Changed gain to be dep_delay - arr_delay, and not vice versa. (#595)

Fixes #594
This commit is contained in:
Albert Y. Kim
2018-06-20 01:00:48 -07:00
committed by Hadley Wickham
parent a2f7418c10
commit acb815d95f

View File

@@ -325,7 +325,7 @@ flights_sml <- select(flights,
air_time
)
mutate(flights_sml,
gain = arr_delay - dep_delay,
gain = dep_delay - arr_delay,
speed = distance / air_time * 60
)
```
@@ -334,7 +334,7 @@ Note that you can refer to columns that you've just created:
```{r}
mutate(flights_sml,
gain = arr_delay - dep_delay,
gain = dep_delay - arr_delay,
hours = air_time / 60,
gain_per_hour = gain / hours
)
@@ -344,7 +344,7 @@ If you only want to keep the new variables, use `transmute()`:
```{r}
transmute(flights,
gain = arr_delay - dep_delay,
gain = dep_delay - arr_delay,
hours = air_time / 60,
gain_per_hour = gain / hours
)