tests/testthat/line_breaks_fun_call/switch_ifelse_etc_no_line_break-in.R

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

call(
  2,
  3
)

switch(
  x,
  a = 2,
  y = 3
)


switch( #
  x,
  a = 2,
  y = 3
)



switch(
  x,
  a = 2, #


  y = 3
)


switch(
       x,a = 2,
       y = 3
)

switch(x,a = 2,
  y = 3
)

switch(x,a = 2, y = 3)

switch(x,a = 2, y = 3
) #

switch(x,a = 2, y = 3 #
)

if_else(a,
  c, v
)

ifelse(x,
  y, z
)


# namespacing
base::switch(f,
             x = 2,
             y = 3
)

base::switch(
  f,
             x = 2,
             y = 3
)

dplyr::ifelse(x,
              1, 32
)

dplyr::ifelse(
  x,
              1, 32
)