tests/testthat/line_breaks_and_other/assignment-in.R

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

x <-
  2


x <- 3


x <-
  # the culprit

  3


x = #
  2


x = 3

x =

  # comment
  3



ImportantDataFrame$ImportantColumn1 <-
  ImportantDataFrame$ImportantColumn2 <-
  ComplicatedFunction(ImportantDataFrame$InputColumn)


ImportantDataFrame$ImportantColumn1 <-
  ImportantDataFrame$ImportantColumn2 <- ComplicatedFunction(ImportantDataFrame$InputColumn)



ImportantDataFrame$ImportantColumn1 <-

  ImportantDataFrame$ImportantColumn2 <- ComplicatedFunction(ImportantDataFrame$InputColumn)