連続する要素の数を数える - 驚異のアニヲタ社会復帰の予備ベクトル中の連続する要素の連続数は rle で計算できる。 いま、ある塩基配列 s1 <- c("ctgactgagagactttacgtaggagggcccatcgcgccagcggggtgctaaccactagcatgggtaacaccatcacatgctatgtgaaagccctagcggcctgcaaggctgcggggatagttgcgcccacgaaagccaggggactgagaggacgagcggaacctgagggaggccatgagtactctgcccctcctggtgat", "ccccccagaccggaatatgcaaatgtgtccggggccgccgcagatactacctgaccagagacccaaccactccaccccgggctgcctgggaaacagttagacactcccctatcaattcatggctgggatatgggttcgcatggtcct
