tests/testthat/token_adding_removing/mixed_token-out.R

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

# = replaced with <-
a <- 3
data_frame(a = 3)

# semicolon
a
b
c
d


# quotes
"text with 'quotes'"
'text with "quotes"'



# adding brackets in pipes
a %>%
  b() %>%
  c()

# adding brackets in pipes combined with line breaks
a %>%
  b() %>%
  c()