如何从string中删除所有的空格?

所以" xx yy 11 22 33 "将变成"xxyy112233" 。 我怎样才能做到这一点?

一般来说,我们想要一个vector化的解决scheme,所以这里有一个更好的testing例子:

 whitespace <- " \t\n\r\v\f" # space, tab, newline, # carriage return, vertical tab, form feed x <- c( " xy ", # spaces before, after and in between " \u2190 \u2192 ", # contains unicode chars paste0( # varied whitespace whitespace, "x", whitespace, "y", whitespace, collapse = "" ), NA # missing ) ## [1] " xy " ## [2] " ← → " ## [3] " \t\n\r\v\fx \t\n\r\v\fy \t\n\r\v\f" ## [4] NA 

基本的R方法: gsub

gsub用另一个stringreplace一个string( fixed = TRUE )或正则expression式( fixed = FALSE ,默认值)的所有实例。 要删除所有空格,请使用:

 gsub(" ", "", x, fixed = TRUE) ## [1] "xy" "←→" ## [3] "\t\n\r\v\fx\t\n\r\v\fy\t\n\r\v\f" NA 

正如DWin指出的那样,在这种情况下, fixed = TRUE并不是必需的,但由于匹配固定string比匹配正则expression式的速度更快,所以性能稍好。

如果你想删除所有types的空白,使用:

 gsub("[[:space:]]", "", x) # note the double square brackets ## [1] "xy" "←→" "xy" NA gsub("\\s", "", x) # same; note the double backslash library(regex) gsub(space(), "", x) # same 

"[:space:]"是与所有空格字符匹配的R特定的正则expression式组。 \s是一个独立于语言的正则expression式,它执行相同的操作。


stringr方法: str_replace_allstr_trim

stringr在基本的R函数周围提供了更多可读的包装(虽然截至2014年12月,开发版本在stringi之上有一个分支,下面stringi提到)。 上述命令的等同使用[ str_replace_all][3]是:

 library(stringr) str_replace_all(x, fixed(" "), "") str_replace_all(x, space(), "") 

stringr还有一个str_trim函数,它只删除前导和尾随的空白。

 str_trim(x) ## [1] "xy" "← →" "x \t\n\r\v\fy" NA str_trim(x, "left") ## [1] "xy " "← → " ## [3] "x \t\n\r\v\fy \t\n\r\v\f" NA str_trim(x, "right") ## [1] " xy" " ← →" ## [3] " \t\n\r\v\fx \t\n\r\v\fy" NA 

stringi方法: stri_replace_all_charclassstri_trim

stringibuild立在独立于平台的ICU库之上,并具有广泛的string操作function。 以上的等价物是:

 library(stringi) stri_replace_all_fixed(x, " ", "") stri_replace_all_charclass(x, "\\p{WHITE_SPACE}", "") 

这里"\\p{WHITE_SPACE}"是被认为是空格的Unicode代码点集合的替代语法,相当于"[[:space:]]""\\s"space() 。 对于更复杂的正则expression式replace,还有stri_replace_all_regex

stringi也有修剪function 。

 stri_trim(x) stri_trim_both(x) # same stri_trim(x, "left") stri_trim_left(x) # same stri_trim(x, "right") stri_trim_right(x) # same 

我刚刚学到了“stringr”包,它用str_trim(,side =“both”)从string的开始和结尾去掉空格,但它也有一个replace函数,所以:

 a <- " xx yy 11 22 33 " str_replace_all(string=a, pattern=" ", repl="") [1] "xxyy112233" 

请注意,以上所述的裁切仅删除空格。 如果你还想删除tab或新行,请使用stringi包中的stringi

 library(stringi) stri_replace_all_charclass(" ala \t ma \n kota ", "\\p{WHITE_SPACE}", "") ## [1] "alamakota" 

使用[[:blank:]]来匹配任何types的水平white_space字符。

 gsub("[[:blank:]]", "", " xx yy 11 22 33 ") # [1] "xxyy112233" 

x =“xx yy 11 22 33”

gsub(“”,“”,x)

[1]“xxyy112233”