Indentation of nested functions aligns to the first function.

I'm probably about to embarrass myself by describing something that's already been fixed, but here goes.

While setting up my editor I set RTools > Editor Options > R > Advanced > Smart indent > By function argument = On

When writing code I expected to see

# What I expected to see
library(dplyr)

mtcars %>%
  mutate(am = factor(am,
                     levels = 0:1,
                     labels = c("Automatic", "Manual")),
         vs = factor(vs,
                     labels = c("No", "Yes")))

But RTVS showed me something much less readable.

# What RTVS displayed
mtcars %>%
    mutate(am = factor(am,
    levels = 0:1,
    labels = c("Automatic", "Manual")),
    vs = factor(vs,
    labels = c("No", "Yes")))

Another example, when making a plot I would like to type

# What I expected to see
library(ggplot2)

ggplot(data = mtcars,
       mapping = aes(x = wt,
                     y = mpg)) +
  geom_point() +
  geom_line()

But RTVS displays

# WHAT RTVS Displayed
ggplot(data = mtcars,
       mapping = aes(x = wt,
       y = mpg)) +
       geom_point() +
       geom_line()

Notice that in this case, even after closing the parentheses for the ggplot function, the indentation still lines up strangely (seven spaces in front of geom_point instead of four). This is different behavior than if I put all of the ggplot argument on one line

# What it looks like in RTVS
ggplot(data = mtcars, mapping = aes(x = wt, y = mpg)) +
    geom_point() +
    geom_line()

If there's an option or configuration I'm missing, please let me know.

microsoft / RTVS

Indentation of nested functions aligns to the first function. #4296

Similar issues