r4ds/workflow-pipes.Rmd

120 lines
4.8 KiB
Plaintext
Raw Normal View History

# Workflow: Pipes {#workflow-pipes}
2021-04-21 21:25:39 +08:00
2022-02-16 05:34:31 +08:00
```{r, results = "asis", echo = FALSE}
status("restructuring")
```
2022-02-21 05:15:13 +08:00
The pipe, `|>`, is a powerful tool for clearly expressing a sequence of operations that transform an object.
We briefly introduced them in the previous chapter but before going too much farther I wanted to give a little more motivation and discuss another pipe that you're likely to see in the wild.
2021-04-21 21:25:39 +08:00
2022-02-17 05:51:27 +08:00
## Why use a pipe?
2021-04-21 21:25:39 +08:00
2022-02-21 05:15:13 +08:00
Because each individual dplyr function is quite simple, solving complex problems typically require multiple verbs together.
For example, the last chapter finished with a moderately complex pipe:
2021-04-21 21:25:39 +08:00
2022-02-17 05:51:27 +08:00
```{r, eval = FALSE}
flights |>
filter(!is.na(arr_delay), !is.na(tailnum)) |>
group_by(tailnum) |>
summarise(
delay = mean(arr_delay, na.rm = TRUE),
n = n()
)
```
2021-04-21 21:25:39 +08:00
2022-02-21 05:15:13 +08:00
Even though this pipe has four steps, because the verbs come at the start of each line, it's quite easy to skim: we start with flights, then filter, then group, then summarize.
2021-04-21 21:25:39 +08:00
2022-02-17 05:51:27 +08:00
What would happen if we didn't have the pipe?
2022-02-21 05:15:13 +08:00
We could nest each function call inside the previous call:
```{r, eval = FALSE}
2022-02-17 05:51:27 +08:00
summarise(
group_by(
filter(
flights,
!is.na(arr_delay), !is.na(tailnum)
),
tailnum
),
delay = mean(arr_delay, na.rm = TRUE
),
n = n()
)
```
2022-02-21 05:15:13 +08:00
Or we could use a bunch of intermediate variables:
```{r, eval = FALSE}
2022-02-17 05:51:27 +08:00
flights1 <- filter(flights, !is.na(arr_delay), !is.na(tailnum))
flights2 <- group_by(flights1, tailnum)
flights3 <- summarise(flight2,
delay = mean(arr_delay, na.rm = TRUE),
n = n()
)
```
2022-02-21 05:15:13 +08:00
While both of these forms have their place and time, the pipe generally produces code that is easier to read and easier to write.
To add the pipe to your code, we recommend using the build-in keyboard shortcut Ctrl/Cmd + Shift + M.
You'll also need to make one change to your RStudio options to use the base pipe instead of the magrittr pipe as shown in Figure \@ref(fig:pipe-options); more on that next.
```{r pipe-options, out.width = NULL, echo = FALSE}
#| fig.cap: >
#| To insert `|>`, make sure the "Use native pipe" option is checked.
#| fig.alt: >
#| Screenshot showing the "Use native pipe operator" option which can
#| be found on the "Editing" panel of the "Code" options.
knitr::include_graphics("screenshots/rstudio-pipe-options.png")
```
2022-02-16 05:34:31 +08:00
## magrittr and the `%>%` pipe
2022-02-17 05:51:27 +08:00
If you've been using the tidyverse for a while, you might have been be more familiar with the `%>%` pipe provided by the **magrittr** package by Stefan Milton Bache.
The magrittr package is included in the code the tidyverse, so you can use `%>%` whenever you use the tidyverse:
```{r, message = FALSE}
library(tidyverse)
mtcars %>%
group_by(cyl) %>%
summarise(n = n())
```
2022-02-17 05:51:27 +08:00
For simple cases `|>` and `%>%` behave identically.
So why do we recommend the base pipe?
Firstly, because it's part of base R, it's always available for you to use, even when you're not using the tidyverse.
2022-02-21 05:15:13 +08:00
Secondly, the `|>` is quite a bit simpler than `%>%`: in the 7 years between the invention of `%>%` in 2014 and the inclusion of `|>` in R 4.1.0 in 2021, we better learned what the core strength of the pipe was, allowing the base implementation to jettison infrequently used and less important features.
2022-02-21 05:15:13 +08:00
## Base pipe vs magrittr pipe
2022-02-21 05:15:13 +08:00
While `|>` and `%>%` behave identically for simple cases there are a few important differences.
These are most likely to affect you if you're a long-term `%>%` user who has taken advantage of some of the more advanced features.
But they're good to know about even if you've never used `%>%`, because you're likely to encounter some of them when reading wild-caught code.
2022-02-21 05:15:13 +08:00
- The pipe requires that object on the left hand side be passed to the first argument of the function on the right-hand side.
`%>%` allows you change the placement using `.` as a placeholder.
For example, `x %>% f(1)` is equivalent to `f(x, 1)` but `x %>% f(1, .)` is equivalent to `f(1, x)`.
2022-02-21 05:15:13 +08:00
R 4.2.0 will bring a `_` as a placeholder, but it has to be named, so you could write `x |> f(1, y = _)`.
The base placeholder is deliberately simple; you can't pass it to multiple arguments, and it doesn't have the special behavior that `%>%` does when used with `{}`.
2022-02-21 05:15:13 +08:00
You can also use both `.` and `_` on the left-hand side of operators like `$`, `[[`, `[` (which you'll learn about in Chapter \@ref(vectors)):
2022-02-21 05:15:13 +08:00
``` r
2022-02-17 05:51:27 +08:00
mtcars %>% .$cyl
2022-02-21 05:15:13 +08:00
mtcars |> _$cyl
2022-02-17 05:51:27 +08:00
```
2022-02-21 05:15:13 +08:00
For the special case of extracting a column out of a data frame, you can also use `dplyr::pull():`
2022-02-17 05:51:27 +08:00
```{r}
mtcars |> pull(cyl)
```
2022-02-21 05:15:13 +08:00
- When calling a function with no argument, `%>%` allowed you to drop the drop the parentheses, and write (e.g.) `x %>% ungroup`.
`|>` always requires the parentheses.
2022-02-17 05:51:27 +08:00
- Starting a pipe with `.`, like `. %>% group_by(x) %>% summarise(x)` would create a function rather than immediately performing the pipe.
2022-02-21 05:15:13 +08:00
This is an error with the base pipe.