Кодоны и цифры

Question

everyboy. Я начинающий с R. Я хотел бы спросить, как вы можете назначить кодон числу, которое я имею в виду: AAA равно 1 AA C равно 2 AAG равно 3 AAT или AAU равно 4. , , И впоследствии. Спасибо всем

Answer 1

bases <- c("A","C","G","T")
x <- levels(interaction(bases,bases,bases, sep = ""))
x <- x[order(x)]
data.frame(number=1:length(x), codon=x)

Answer 2

Как то так?

BASES = c("A","C","G","T")
triN = apply(expand.grid(BASES,BASES,BASES),1,paste,collapse="")
data.frame(number=1:length(triN),codon=sort(triN))

   number codon
1       1   AAA
2       2   AAC
3       3   AAG
4       4   AAT
5       5   ACA
6       6   ACC
7       7   ACG
8       8   ACT
9       9   AGA
10     10   AGC
11     11   AGG
12     12   AGT