如何将表情符号与R正则表达式相匹配？

我想确定我的vector的哪些元素包含表情符号:

x = c('', 'no', '', '', 'no', '', '?', '??')
x
# [1] "\U0001f602" "no"         "\U0001f379" "\U0001f600" "no"         "\U0001f61b" "?"         "??"

相关帖子只涵盖其他语言,因为大部分都是指专业图书馆,我无法想出一种翻译成R的方法:

从字符串中提取所有表情符号的正则表达式是什么？

如何从字符串中删除表情符号

在Javascript中使用regexp替换表情符号unicode符号

正则表达式匹配Mac OS X/iOS中的表情符号

在python中使用re删除unicode表情符号

第二个看起来很有希望,但唉(不是通过提供固定perl = TRUE):

x[grepl('[\u{1F600}-\u{1F6FF}]', x)]

错误:无效\ u {xxxx}序列(第1行)

类似的问题来自其他问题.我们怎样才能匹配R中的表情符号？