我想提高自己的编码技巧。要清理数据集,我必须从列中删除单词以使其更易于理解。我写了一个删除单词的函数,它正在工作。但是,我发现自己仍然会复制并粘贴代码(例如,我想要的所有单词,它变得比我预期的要多得多)。
我想改进我的功能,所以它需要一个字符向量来删除单词 - 或者在循环中使用该函数,这样我就不会一直复制和粘贴我的代码?
这就是我现在正在做的事情:
#Where x is my dataset, $NAAM_VERWIJZER is the column in which all the words need to be removed.
remove_word <- function(x, word){
gsub(word, "", x$NAAM_VERWIJZER)
}
data1$NAAM_VERWIJZER <- remove_word(data1, "DAALMEER")
data1$NAAM_VERWIJZER <- remove_word(data1, "HUISARTSENZORG")
data1$NAAM_VERWIJZER <- remove_word(data1, "HUISARTS")
data1$NAAM_VERWIJZER <- remove_word(data1, "HUISARTSENZORG")
data1$NAAM_VERWIJZER <- remove_word(data1, "ALKMAAR")
data1$NAAM_VERWIJZER <- remove_word(data1, "GEZONDHEIDSCENTRUM")
data1$NAAM_VERWIJZER <- remove_word(data1, "ENPRAKTIJK")
必须有一个更清洁的方式。