一般来说，我们想要一个矢量化的解决方案，所以这里有一个更好的测试示例：

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

基础 R 方法：gsub

gsubfixed = TRUE用另一个字符串替换字符串 ( ) 或正则表达式 ( 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不是必需的，但会提供稍微更好的性能，因为匹配固定字符串比匹配正则表达式更快。

如果要删除所有类型的空格，请使用：

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 的正则表达式组。 \s是一个独立于语言的正则表达式，它做同样的事情。

stringr方法：str_replace_all和str_trim

stringr围绕基本 R 函数提供了更多人类可读的包装器（尽管截至 2014 年 12 月，开发版本有一个基于 的分支stringi，如下所述）。使用 [ 的上述命令的等价物str_replace_all][3]是：

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

stringr还具有str_trim仅删除前导和尾随空格的功能。

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

stringi方法：stri_replace_all_charclass和stri_trim

stringi建立在独立于平台的ICU 库之上，并具有广泛的字符串操作函数集。上面的等价物是：

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

这是被认为是空白的 Unicode 代码点集的另一种语法，"\\p{WHITE_SPACE}"相当于和。对于更复杂的正则表达式替换，还有."[[:space:]]"``"\\s"``space()``stri_replace_all_regex

stringi还具有修剪功能。

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