suppressMessages(library(dplyr))
library(mario)
pipeline_call <- mtcars %>%
slice(1:20) %>%
select(mpg) %>%
parse_pipeline()
pipeline_call
## mtcars %>% slice(1:20) %>% select(mpg)
parse_pipeline(
mtcars %>%
slice(1:20) %>%
select(mpg)
)
## mtcars %>% slice(1:20) %>% select(mpg)
mtcars %>%
slice(1:20) %>%
select(mpg) %>%
parse_pipeline()
## mtcars %>% slice(1:20) %>% select(mpg)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.