tests/testthat/fun_dec/line_break_fun_dec-out.R

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

a <- function(x, #
              y) {
  x - 1
}


a <- function(x, #
              y) #
{
  x
}

a <- function(x, #
              y #
) {
  y
}


a <- function(x,
              y) {
  x - 1
}

a <- function(x,
              #
              y) {
  x - 1
}

a <- function(x,
              y) {
  x - 1
}


a <- function(x,
              y) {
  x - 1
}

a <- function(
    #
    x,
    y) {
  x - 1
}