r - 如何在 R 中以 3 为一组粘贴字符

Question

这是一个 DNA 串，我想将其拆分然后组合成 3 个一组

dna=c("TACACGATGACAGTCTTGACGGGTTCTCCTACT")
dna.sg = unlist(strsplit(dna, ""))

给予

 [1] "T" "A" "C" "A" "C" "G" "A" "T" "G" "A" "C" "A" "G" "T" "C" "T" "T" "G" "A" "C" "G" "G" "G" "T" "T" "C" "T" "C" "C" "T" "A" "C" "T"

但我想拥有

"TAC" "ACG" [...]

Answer 1

您可以在 strsplit 中每 3 个字符拆分一次。

unlist(strsplit(dna, "(?<=.{3})", perl = TRUE))
#[1] "TAC" "ACG" "ATG" "ACA" "GTC" "TTG" "ACG" "GGT" "TCT" "CCT" "ACT"