print_pipe_steps: Prints the return objects of all pipe steps to console

In ViewPipeSteps: Create View Tabs of Pipe Chains

Description

Added as last command to a pipe, prints for each pipe step the resulting object to the console if unique. Data frames are converted by as_tibble().

Usage

print_pipe_steps(.data, cmd = print_command, all = FALSE)

Arguments

.data	The data, normally handed over from the prior pipe step.
cmd	The command to be evaluated for each object. Takes ps object of step example.
all	Whether you want to print objects even if they are identical. Helpful when you want to display changes in grouping.

Value

The unchanged data

Examples

if (!require(dplyr)) stop("Examples need dplyr to run")
mtcars %>%
  filter(am == 1) %>%
  select(qsec) %>%
  print_pipe_steps() -> result

my_print_cmd <- c(
  "message(title);",
  "skimr::skim_tee(data = ps%d)"
)

mtcars %>%
  select(am, hp, mpg) %>%
  group_by(am) %>%
  print_pipe_steps(my_print_cmd, all = TRUE) %>%
  summarize(
    nobs = n(),
    mean_hp = mean(hp),
    mean_mpg = mean(mpg)
  )

ViewPipeSteps documentation built on Dec. 16, 2021, 1:06 a.m.