r - 修复源的缩进并使其干净

Question

是否有任何合适的程序来修复已经编写的 R 脚本的缩进？

例如，如果它被输入这样的脚本：

foo = function(x) {
a = 1
    print(a)
 }

它将其转换为：

foo = function(x) {
    a = 1
    print(a)
}

或更好？

Answer 1

是的，使用亿辉的formatR包。

之前和之后的演示：

R> system("cat /tmp/fex.R")
foo = function(x) {
a = 1
    print(a)
 }
R>
R> library(formatR)
R> tidy.source("/tmp/fex.R",replace.assign=TRUE)
foo <- function(x) {
    a <- 1
    print(a)
} 
R> 

您当然可以使用重定向到新文件tidy.source(..., file="NewFile.R")

Answer 2

除了 Dirk 的回答之外，大多数体面的编辑器还允许您更正脚本的缩进。例如，在 RStudio 中，如果您打开了脚本，您可以使用Ctrl+i来更新所选内容的缩进。