tests/testthat/indention_operators/pipe_simple-in.R

In krlmlr/styler: Non-Invasive Pretty Printing of R Code

   a %>%
b() %>%
c() %>%
          d(1 + e (sin(f))) %>%
                                 g_out()

a <- function(jon_the_pipe) {}

x %>%

  # break
  call()


y %>%


  call() # mor