我对R中的文本处理不熟悉，并且停留在如何删除字符串中的前导空白处。这是一些代码：
set.seed(1234)
b <- paste0(sample(c("bbb ", " bbb "), 10, replace = TRUE), rep("ccc ddd", 10))
print(b)
[1] "bbb ccc ddd" " bbb ccc ddd" " bbb ccc ddd" " bbb ccc ddd" " bbb ccc ddd"
[6] " bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd" " bbb ccc ddd" " bbb ccc ddd"
我发现可以删除结尾的空格，sub(' +$', '', b)但是将其更改为sub('$+ ', '', b)不会删除开头的空格。猜猜这是一个快速解决方案...
如果您遇到以下问题：
您将看到一个关于修剪空白的非常彻底的答案：那里的答案提供了以下功能：
trim.leading <- function (x) sub("^\\s+", "", x)
应用于您的数据：
set.seed(1234)
b <- paste0(sample(c("bbb ", " bbb "), 10, replace = TRUE), rep("ccc ddd", 10))
b
trim.leading(b)
#[1] "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd"
#[8] "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd" "bbb ccc ddd"
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句