r - 如何从数据集中部分删除特定符号(如逗号)

Question

我有这样一个数据集:

Quest_main=c("quest2,","quest5,","quest4,","quest12,","quest4,","quest5,quest7")

我想从例如“quest2”中删除逗号，这样它就是“quest2”，而不是从“quest5,quest7”中删除。我想我必须使用 substr 或 ifelse，但我不确定。调用Quest_main时的最终结果是这样的:

 "quest2"   "quest5"   "quest4"   "quest12"   "quest4"   "quest5,quest7"

谢谢!

Answer 1

你只需要

gsub(",$","",Quest_main)

$ 表示一个字符串的结束:完整的解释，参见(又长又复杂的)?regexp，或者 more general introduction to regular expressions ，或在 Stack Overflow 上搜索标签 [r] [regex]。

如果你坚持用 substr() 和 ifelse() 来做，你可以:

nc <- nchar(Quest_main)
lastchar <- substr(Quest_main,nc,nc)
ifelse(lastchar==",",substr(Quest_main,1,nc-1),
                     Quest_main)