r - 在 R 代码中使用样式器将 T 替换为 TRUE，F 替换为 FALSE

Question

library("styler")
myugly_code <- "if ( x==T ) print( 'y' )"
style_text(myugly_code)
#> if (x == T) print("y")

创建于 2020-01-13 由 reprex package (v0.3.0)

我承认我们应该始终使用 TRUE或 FALSE而不是 T和 F在写作时放在首位 R代码。但是，当编辑以前的代码或其他人使用 T 编写的代码时和 F , 是否可以使用像 styler 这样的包替换所有 T和 F与 TRUE和 FALSE .在上面的代码中，我想得到:

#> if (x == TRUE) print("y")

Answer 1

我不知道styler，但你可以替换'T'与 'TRUE'使用 gsub . '\\b'字符是单词边界，因此只有 'T'每边都有一个单词边界被替换，而不是例如'T'在 'Test' .

sub_TF <- function(s){
  s <- gsub('\\bT\\b', 'TRUE', s)
  gsub('\\bF\\b', 'FALSE', s)
}

sub_TF("list(T, 'Test', F, 'Fox')")
# [1] "list(TRUE, 'Test', FALSE, 'Fox')"