我想使用以下内容将我PitchAccent
data.frame中非data
的列no
的名称更改为yes
data$Pitch<-gsub(!("no"), "yes", data$PitchAccent)
将其保存到新列中。
由于我要将大约10个不同的名称更改为yes
,因此多次运行data$Pitch<-gsub("H*L","yes",data$PitchAccent)
会很烦人。
有更好的方法吗?
修改
在PitchAccent
列中,我们有:
答案 0 :(得分:2)
根据您的问题,我不知道您是否在"yes"
旁边有许多不同的词语,以便了解如何使用gsub
或类似内容。
如果您的PitchAccent
列中只有一个单词
yes_words = c(... words you want to change into "yes" ...)
data$Pitch <- data$PitchAccent
data$Pitch[data$Pitch %in% yes_words] <- "yes"
如果你必须检测那些话
library(stringr)
yes_ind = str_detect(data$PitchAccent, c("strings that identify which elements you need to change"))
data$Pitch <- data$PitchAccent
data$Pitch[yes_ind] <- "yes"