【发布时间】:2012-12-13 20:35:17
【问题描述】:
字符串是"\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\tLocation\r\n\t\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\tSan Francisco, CA;Oakland, CA",我希望它显示为"Location","San Francisco, CA;Oakland, CA"。
有这个功能吗?谢谢!
【问题讨论】:
字符串是"\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\tLocation\r\n\t\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\tSan Francisco, CA;Oakland, CA",我希望它显示为"Location","San Francisco, CA;Oakland, CA"。
有这个功能吗?谢谢!
【问题讨论】:
您可以使用正则表达式来删除特殊字符:
x <-"\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\tLocation\r\n\t\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\tSan Francisco, CA;Oakland, CA"
gsub('[\r\n\t]', '', x)
但是,如果你真的有一个包含所有这些 \ 的字符串,那么答案就会变得更像:
gsub('\\\\[a-z]', '', x)
【讨论】:
不清楚是否要将字符串的两个部分分开。如果你这样做了,你可以使用:
test <- c("\r\n\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\tLocation\r\n\t\t\t\t\t\t\t\t\t\t\t\r\n\t\t\t\t\t\t\t\t\t\t\tSan Francisco, CA;Oakland, CA")
result <- unlist(strsplit(test,"\\r|\\n|\\t"))
result <- result[result!=""]
result
[1] "Location" "San Francisco, CA;Oakland, CA"
【讨论】: