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") 重定向到一个新文件。