Grepl 函数在 R 中不起作用

Grepl function not working in R

我正在尝试对数据框中的多个字符串进行 grep

head(data1) 

colname.x 

Facebook
POF Free Dating App
WhatsApp Messenger
WhatsApp Messenger
Facebook
Facebook
Facebook
Facebook
WhatsApp Messenger
POF Free Dating App
Facebook
Facebook
WhatsApp Messenger
Facebook
Messenger
Facebook
Facebook
Dropbox
WhatsApp Messenger
Facebook
Dropbox
WhatsApp Messenger
WhatsApp Messenger
Facebook

我正在附加数据框以包含新的社交媒体栏

data1$socialmedia <- as.numeric(grepl("messenger | facebook | whatsapp " , data1$colname.x ))  

但是我得到的只是 0,即 FALSE 而不是 True/1,其中存在 Facebook/Whatsapp 等,我不确定为什么会这样。

R 是 space,大写,编码敏感!

尝试 data1$socialmedia <- as.numeric(grepl("Messenger|Facebook|WhatsApp",data1$colname.x ))

如果你更好地解释你的想法,我可以提供更好的答案:)