リストを要素ごとに降順で並べ替えるのに苦労しています...
ByPos_Mindex オブジェクトまたは 1000 個の IRange オブジェクト (CG_seqP) のリストを持っています。
C <- vmatchPattern(CG, CPGi_Seq, max.mismatch = 0, with.indels = FALSE)
IRanges object with 27 ranges and 0 metadata columns:
start end width
<integer> <integer> <integer>
[1] 1 2 2
[2] 3 4 2
[3] 9 10 2
[4] 27 28 2
[5] 34 35 2
... ... ... ...
[23] 189 190 2
[24] 207 208 2
[25] 212 213 2
[26] 215 216 2
[27] 218 219 2
長さ (これらの IRanges の 1000)
次に、これを開始整数のみのリストに変更します(これが必要です)
CG_SeqP <- sapply(C, function(x) sapply(as.vector(x), "[", 1))
[[1]]
[1] 1 3 9 27 34 47 52 56 62 66 68 70 89 110 112
[16] 136 140 146 154 160 163 178 189 207 212 215 218
(これらの 1000)
を使用して要素のリストを並べ替えようとすると、問題が発生します
CG_SeqP <- sapply(as.vector(CG_SeqP),order, decreasing = TRUE)
行番号と思われるもののリストを取得するので、最初の IRANge オブジェクトが 27 の場合、これを取得します...
CG_SeqP[1]
[[1]]
[1] 27 26 25 24 23 22 21 20 19 18 17 16 15 14 13 12 11 10 9 8
[21] 7 6 5 4 3 2 1
したがって、減少は機能しましたが、実際の要素のリストでは機能しません>?
任意の提案、前もって感謝します。