替换字符串中的某个字母并删除R中的尾随元音

Question

我试图删除所有某些字母，例如'M'，在R之前或之后是元音。所以，我写了......

gsub ('(A|E|I|O|U)\\M','\\',"MICHAEL")

在这里，我尝试消除前面有元音的字符串中的所有'M'。显然，替换是错误的...我不知道如何编码...

另外，有没有办法在同一行编写代码，而不是编写两行不同的代码，一行用于前面，另一行用后面跟一个元音？

另一个问题是...... 我找到了一种方法来删除R中的尾随空格，但有任何想法如何删除R中字符串末尾的尾元音？

Answer 1

我不知道如何在一行中完成所有内容，但这里有一些正常的代码：

# remove M, if the wowel is immediately after or immediately before
gsub('([AEIOU])M|M([AEIOU])','\\1\\2','AAAMLICHAELMLMAAAAAA')    

# remove vowels in the beginning
gsub('^(A|E|I|O|U){1,}','',"AAAMICHAEL")
# remove vowels in the end
gsub('(A|E|I|O|U){1,}$','',"AMICHAELAAAA")