我从R文档中了解到，gsub函数可以被编程为同时执行操作，例如上/下替换:
gsub("([a-z]*)([A-Z]*)", "\\U\\1\\L\\2", "upper LOWER", perl=TRUE)
[1] "UPPER lower"
我有一个最小的例子，一个字符串"STTS"，其中我想将"S"替换为"True"，将"T"替换为"RST".我不能按顺序进行，因为匹配的模式显然会发生冲突.
我try 过这个代码:
gsub("([S]*)\\1([T]*)\\2", "TRUE \\1FALSE \\2", "STTS",perl=TRUE)
并收到了[1] "TRUE FALSE STRUE FALSE TSTRUE FALSE "
而不是"TRUE FALSE FALSE TRUE"
原来的gsub碱基R函数不支持条件替换.
您可以在此处使用stringr::str_replace_all应用条件替换:
library(stringr)
trimws(str_replace_all("STTS", "[ST]", function(x) ifelse(x=="S", "TRUE ", "FALSE ")))
## => [1] "TRUE FALSE FALSE TRUE"
此处使用R版本4.3.1(2023-06-16 ucRT).
因此，[ST]模式会找到S或T，并根据与替换函数的匹配来替换字母.
看看online R demo.由于我们在每个TRUE或FALSE后面添加了一个空白，所以我添加了trimws()函数.
如果您想使用gsubfn套餐，可以使用
library(gsubfn)
trimws(gsubfn("[ST]", ~ ifelse(x=="S", "TRUE ", "FALSE "), "STTS"))
## => [1] "TRUE FALSE FALSE TRUE"
它做与上述相同的事情.