r - R を使用して、文字列内で連続して発生する特定の文字のストレッチを識別します

Question

以下のデータ フレームの文字列列が、文字列の最初の 20 文字内で文字「V」または「G」を少なくとも 5 回繰り返すかどうかを特定したいと思います。

サンプルデータ：

 data = data.frame(class = c('a','b','C'), string =
 c("ASADSASAVVVVGVGGGSDASSSDDDFGDFGHFGHFGGGGGDDFFDDFGDFGTYJ",
 "AWEERTGVTHRGEFGDFSDFSGGGGGGDAWSDFAASDADAADWERWEQWD",
 "GRTVVGGVVVGGSWERGERVGEGDDFASDGGVQWEQWEQWERERYRYER"))

たとえば、最初の行の文字列には、最初の 20 文字の位置に「VVVVG」があります。同様に、3 行目の文字列には「VVGGV」があります。

data
#  class                                                  string
#1     a ASADSASAVVVVGVGGGSDASSSDDDFGDFGHFGHFGGGGGDDFFDDFGDFGTYJ
#2     b      AWEERTGVTHRGEFGDFSDFSGGGGGGDAWSDFAASDADAADWERWEQWD
#3     C       GRTVVGGVVVGGSWERGERVGEGDDFASDGGVQWEQWEQWERERYRYER

目的の出力は次のようになります。

#   class                                                  string result
# 1     a ASADSASAVVVVGVGGGSDASSSDDDFGDFGHFGHFGGGGGDDFFDDFGDFGTYJ   TRUE
# 2     b      AWEERTGVTHRGEFGDFSDFSGGGGGGDAWSDFAASDADAADWERWEQWD  FALSE
# 3     C       GRTVVGGVVVGGSWERGERVGEGDDFASDGGVQWEQWEQWERERYRYER   TRUE

Answer 1

なしの別のオプションsubstr：

within(data, result<-grepl('^.{,15}[VG]{5,}', string))