r - 合并为 gregexpr 输出的一个字符串的更简单方法？

Question

我试图将key出现在string中时的所有索引合并到一个字符串中。我想出了以下内容。但我想知道是否有更简单/更短的方法？

mystring = "ASDAS ap ASDASD ap AS"
key = "ap"
x = paste(as.data.frame(gregexpr(key, mystring))[1:nrow(as.data.frame(gregexpr(key, mystring))),], collapse=", ")

输出如下:

> x
[1] "7, 17"

Answer 1

我猜你想要类似下面的东西:

paste(gregexpr(key, mystring)[[1]], collapse = ', ')
#[1] "7, 17"

只需使用 [[1]] 对 gregexpr 输出进行子集化就足够了。