R的正則表達式，在任意數字後插入一個字母

Question

在構建新模型時，我遇到需要修改普通glm模型框架，如Y~ x1+x2+I(x1*x2)+I(x1^2)到Y~ x1m+x2m+I(x1m*x2m)+I(x1m^2)。基本上我需要的是在設計矩陣中的數字後面插入一個字母。所以從c('x1','x2','I(x1*x2)','I(x1^2)')到c('x1m','x2m','I(x1m*x2m)','I(x1m^2'))在通用的方式。

我一直在努力解決這個問題超過一天，任何建議將不勝感激！

麗芙

Answer 1

我想你想這樣的事情，

> x <- c('x1','x2','I(x1*x2)','I(x1^2)') 
> gsub("(?<!\\^)(\\d)", "\\1m", x, perl=T) 
[1] "x1m"  "x2m"  "I(x1m*x2m)" "I(x1m^2)" 

這(?<!\\^)(\\d)正則表達式將捕獲所有未通過^符號開頭的數字。將匹配的數字替換爲組索引1中的數字加上字母m將提供所需的輸出。