Wygeneruj wszystkie możliwe kombinacje zestawu znaków r

x <- c("T", "A", "C", "G")

do.call(expand.grid, rep(list(x), 3))
Crazy Llama