使用substr()删除字符串指定位置字符失败的原因及简易解决方法

嘿，这个问题我之前也踩过坑！咱们先搞清楚为什么你的代码没起作用，再给你几个简单的解决办法。

为什么你的代码失效？ #

substr<-函数的设计逻辑是替换字符串中指定位置范围内的字符，而不是删除这些字符并缩短整个字符串的长度。当你执行substr(x, 2, 3) <- ""时，你其实是在尝试把第2到3位的字符替换为空字符串，但R的字符串处理并不会自动截断总长度——如果替换的字符串长度和目标位置的长度不匹配，它不会主动修改原字符串的结构，这就是你看到x还是"abc"的原因（注：在新版本R中这个操作会得到"a"，但本质上它还是替换而非删除逻辑，不是按位置删字符的正确姿势）。

几个简易的实现方法 #

方法1：用基础R的字符串拼接（按位置删除） #

如果你明确知道要删除的是第n位字符，可以直接截取前后部分拼接：

x <- "abc"
# 删除第2位字符
x <- paste0(substring(x, 1, 1), substring(x, 3))
x # [1] "ac"

方法2：用stringr包的直观函数（更推荐） #

stringr包是tidyverse系列里处理字符串的利器，语法更易懂：

• 如果是按字符内容删除（比如删除所有"b"）：

library(stringr)
x <- "abc"
x <- str_remove(x, "b")
x # [1] "ac"

• 如果是严格按位置删除第2位字符：

x <- str_sub_replace(x, start = 2, end = 2, replacement = "")
x # [1] "ac"

方法3：拆分成字符向量再重组（基础R通用方法） #

把字符串拆成单个字符的向量，删掉指定位置后再拼接回去：

x <- "abc"
# 拆成字符向量
char_vec <- strsplit(x, "")[[1]]
# 删除第2个元素
char_vec <- char_vec[-2]
# 重新拼接成字符串
x <- paste(char_vec, collapse = "")
x # [1] "ac"

内容的提问来源于stack exchange，提问作者PascalIv