tests/testthat/line_breaks_fun_call/switch_ifelse_etc_no_line_break-out.R

In 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
)