我的另一列上的R data.table grepl列

mom*_*822 3 r data.table

当A列中的字符串位于B列中时,我可以作为子集吗?

例:

x <- data.table(a=letters, y=paste0(letters,"x"))

x[grepl(a, y)]
x[like(y, a)]
Run Code Online (Sandbox Code Playgroud)

两者都只返回第一行的一行data.table和以下警告:

Warning message:
In grepl(pattern, vector) :
  argument 'pattern' has length > 1 and only the first element will be used
Run Code Online (Sandbox Code Playgroud)

我希望这将返回所有行。

www*_*www 5

以下代码适用grepl于带有a和的每一y行。基本上,grepl的第一个参数不能是长度大于1的向量,因此需要基于循环或基于lapply的方法。

x[mapply(grepl, a, y), ]
#     a  y
#  1: a ax
#  2: b bx
#  3: c cx
#  4: d dx
#  5: e ex
#  6: f fx
#  7: g gx
#  8: h hx
#  9: i ix
# 10: j jx
# 11: k kx
# 12: l lx
# 13: m mx
# 14: n nx
# 15: o ox
# 16: p px
# 17: q qx
# 18: r rx
# 19: s sx
# 20: t tx
# 21: u ux
# 22: v vx
# 23: w wx
# 24: x xx
# 25: y yx
# 26: z zx
#     a  y
Run Code Online (Sandbox Code Playgroud)

  • 或x [Vectorize(like)(y,a)]`或`x [Vectorize(grepl)(a,y)]` (3认同)