如何在R或Stata中替换列每行的英文句号为字母q

我来帮你搞定这个字符串替换的问题，不管你用R还是Stata，都有很直接的方法：

R语言实现 #

方法1：Base R的gsub()函数 #

假设你的字符串向量是这样定义的：

my_vec <- c("1997.2", "1998.3", "2000.1", "2003.3", "2008.4")

因为英文句号.在正则表达式里是匹配任意字符的特殊符号，所以我们需要用\\.来转义它，然后用gsub()替换所有匹配的内容：

new_vec <- gsub("\\.", "q", my_vec)
# 输出结果："1997q2" "1998q3" "2000q1" "2003q3" "2008q4"

方法2：Tidyverse的str_replace_all()函数 #

如果你习惯用tidyverse生态的工具，可以用stringr包的str_replace_all()函数，代码更直观：

library(tidyverse) # 加载dplyr和stringr等包

my_vec <- c("1997.2", "1998.3", "2000.1", "2003.3", "2008.4")
new_vec <- str_replace_all(my_vec, "\\.", "q")

如果是处理数据框里的列，比如你的数据框叫df，目标列是year_col，可以这样写：

df <- df %>% 
  mutate(year_col = str_replace_all(year_col, "\\.", "q"))

Stata实现 #

情况1：变量是字符串类型 #

假设你的目标变量叫year_col，直接用subinstr()函数替换所有出现的句号，最后一个参数.表示替换所有匹配项：

replace year_col = subinstr(year_col, ".", "q", .)

情况2：变量是数值类型 #

如果你的变量是数值型的，需要先把它转换成字符串类型，再进行替换：

tostring year_col, replace  // 将数值变量转为字符串变量
replace year_col = subinstr(year_col, ".", "q", .)

内容的提问来源于stack exchange，提问作者L-dan