在 R 中添加空格 - 在需要时将 "a<-b" 替换为 "a <- b"

Question

我正在尝试将 spaces 添加到混乱的 R 文件中以将其清理。我们有：

a <- b
g<-h
q <- my_df[,c(1:5)]

j<- k%>%
  mutate(mm = 'new col')%>%
  mutate(nn = 'new col') %>%
  mutate(oo = 'new col')

期望的输出是：

a <- b
g <- h
q <- [, c(1:5)]

j <- k %>%
  mutate(mm = 'new col') %>%
  mutate(nn = 'new col') %>%
  mutate(oo = 'new col')

总结一下：

似乎最好的选择是使用 RStudio 的内置工具进行搜索和替换，并专门使用 Regex 功能。但是，我不太确定如何为这些潜艇编写正确的 Regex 模式而不弄乱其他任何东西。

Answer 1

尝试这些模式（引号表示模式的开始和结束，RStudio find/replace 框中不需要它们）。基本上只要您想要 1 space，我们就使用 * 量词将任意数量的 space（包括 0 个 space）替换为 1 space。

请注意 - 这将格式化您的所有代码，包括任何带引号的字符串。

Find       Replace
" *<- *"   " <- "
" *%>%"    " %>%"
", *"      ", "

Add spaces in R - replace "a<-b" with "a <- b" when needed