r - 如何将R中除某些字母外的所有字母大写

Question

我在 R 中有一个带有一列字符串的数据框，例如v1 <- c('JaStADmmnIsynDK', 'laUksnDTusainS')

我的目标是将每个字符串中除“s”、“t”和“y”之外的所有字母大写。

所以结果最终应该是:“JAStADMMNIsyNDK”和“LAUKsNDTUsAINS”。

因此不会更改任何上述字母:'s'、't' 和 'y'。

到目前为止，我只需要 25 倍就可以做到这一点

levels(df$strings) <- sub('n', 'N', levels(df$strings))

但这似乎有点过分了!我怎样才能在 R 中轻松地做到这一点？

Answer 1

尝试

v2 <- gsub("[sty]", "", paste(letters, collapse="")) 
chartr(v2, toupper(v2), v1)
#[1] "JAStADMMNIsyNDK" "LAUKsNDTUsAINS" 

数据

v1 <- c("JaStADmmnIsynDK", "laUksnDTusainS")