如何删除R中字符串末尾的双空格？

Question

我正在尝试修复一些小问题。我感兴趣的列包含在开头或结尾处带有空格和双倍空格的字符串。

我问之前看过这些帖子

• 将多个空间合并为单个空间；删除尾随/前导空格
• 如何使用删除字符向量中单词之间的多余空格？
• 如何从字符串中删除所有空格？
• 如何修剪R中的前导和尾随空格？

这是我正在做的可复制示例

library(dplyr)

mtcars2 = tbl_df(mtcars) %>% 
   mutate(name = rownames(mtcars)) %>%
   mutate(name = gsub("^ *|(?<= ) | *$", "", name, perl = TRUE)) %>%  
   mutate(name = gsub("^\\s+|\\s+$", "", name)) %>%
   mutate(name = iconv(name, from = "", to = "ASCII//TRANSLIT", sub = ""))

head(mtcars2, 3)

结果是

# A tibble: 3 × 12
    mpg   cyl  disp    hp  drat    wt  qsec    vs    am  gear  carb          name
  <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>         <chr>
1  21.0     6   160   110  3.90 2.620 16.46     0     1     4     4     Mazda RX4
2  21.0     6   160   110  3.90 2.875 17.02     0     1     4     4 Mazda RX4 Wag
3  22.8     4   108    93  3.85 2.320 18.61     1     1     4     1    Datsun 710

但是在我的数据集中之后，仍然存在一些双空格！

是否有更通用的命令来删除字符串末尾的空格？提前谢谢了 ！

Answer 1

您是否尝试过该trimws()功能？

> trimws('   hello   ')
[1] "hello"