文字ベクトル内のパターンのインスタンスをR

Question

で識別します。文字列のベクトル内のパターンのすべてのインスタンスを識別しようとしています。私はちょうどfullにpatternのすべてのインスタンスを見つけたい

fruits <- c("Cherry", "Grape", "Orange", "Lemon") 
    pattern <- c("Lemon", "Grape", "Cherry", "Grape") 
    full <- sample(fruits, 1000, replace = TRUE) 

：私はこのような何かを見ています。私の内なるJavaの赤ちゃんは、このような何かをループすると言いますか？

for(i in 1:(length(full)-length(pattern))) { 
     if(full[i] == pattern[1]) { 
     if(full[i+1] == pattern[2]) { 
      ... 

次に、インデックスを保存します。しかし、それは私にとって非常に効率的ではない。これは道のりですか？誰かがこの機能をもっと簡単に/もっと速くする機能やパッケージの方向に向けることができますか？

編集：その後、私は持っていると思います

... 
    [177] "Lemon" "Grape " "Cherry" "Grape" "Grape" "Lemon" "Cherry" "Grape" "Lemon" "Cherry" "Orange" 
    ... 

： 私は明確されていないよ、私はどこかfullでこのような何かを探して終わるすなわちあれば、どこpattern開始fullで知って申し訳ありませんが必要パターン（レモン、ブドウ、チェリー、ブドウ）がそこに現れ始めてからそのインデックス（177）を見つける方法。理想的には、後でパターンが現れたら、私はそれも知っているでしょう。すべてのインスタンスのpatternを見つける必要があります。

Answer 1

次のように動作するはずです。

which(full %in% pattern) 

Answer 2

それはあなたが探しているが、

l = apply(sapply(full, grepl, pattern), 1, function(x) { (1:length(full))[x] }) 
names(l) = pattern 

はあなたにpattern内の要素、fullにpatternが見られることをインデックスと同じ長さのリストを与えるものを私に完全には明らかではありません。 patternは私に文字列マッチングを意味するので、私はそれが部分文字列の一致ではない場合は、%in%は間違いなく速くなります

することができた、greplを使用しています。