我正在尝试做一些相对简单的事情,但我尝试的任何事情都没有效果。我搜索了我的任务,我似乎无法让我的代码工作。
我试图仅在第一次出现在下一句中时提取字母:
text <- 'i ride my bike'
我尝试过以下代码:
gsub('([[:alpha:]])\\1{1}', '\\1', text)
它没有实现我想要的。我希望最终结果是:
i r d e m y b k
我只想要第一次出现这封信。我在谷歌上找到的东西更像是在减少&#34; hellllllo&#34;到&#34;你好&#34;但我想要&#34; helo。&#34;我希望我有道理!
谢谢大家!
答案 0 :(得分:1)
基于Badger和Gabor的答案,并使用grep
删除第一个空格:
grep(" ",unique(strsplit(text,"")[[1]]),value = TRUE, invert = TRUE)
[1] "i" "r" "d" "e" "m" "y" "b" "k"