1

こんにちは、以下のコードを見つけてください。私が望むのは、実行したい特定の条件チェックに基づいて配列に値を追加することです。値が適格である場合は配列に追加する必要があり、そうでない場合は破棄する必要があります。ただし、必要な配列を取得できません。その点での助けは非常に役立ちます。

>NODE_1
[1]GTTGGCCGAGCCCCAGGACGCGTGGTTGTTGAACCAGATCAGGTCCGGGCTCCACTGCACGTAGTCCTCTTCCCAATTTCCCTTAA

>NODE_2
[1] CCTCCGGCGGCACCACGGTCGGCGAGGCCCTCAACATCCTG GAGCGCACCGACCTGTCCACCGCGGACAAGGCCGGTTACCT
GCACCGCTACATCGAGGCCAGCCGCATCGCGTTCGCGGACC 

>NODE_3
[1]GCCCGGCGCCTGGCCGCGGGCGAGTGGGTCGTGGACCTGCGCTCCCGGGTGGCCTTCGCCGCCGGTCACGTCGCCGGG
   TCGCTCAACTTCGAGGCCGACGGACAGCT

私のコードは次のとおりです。

Length <- function(a)
{
  b<-list()
  for ( i in 1: length(a))
  {
    b[i]<-which(length(a[i])<30, arr.ind = FALSE, useNames = TRUE)
    m<- array(b[i])
  }
}
k<- Length(Y)

だから私がしたいのは、長さが30未満のデータのみを配列に追加することbですY.

4

1 に答える 1

1

文字数を取得するnchar()代わりに使用する必要があります。length()

R の方法で行うには、ブール値のインデックスを使用できます。k <- a[nchar(a)<30]

それが役立つことを願っています!

于 2011-08-05T09:02:07.537 に答える