tests/testthat/fun_dec/line_break_fun_dec-in.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
}