generar todas las combinaciones posibles de un conjunto de caracteres r
x <- c("T", "A", "C", "G")
do.call(expand.grid, rep(list(x), 3))
Crazy Llama
x <- c("T", "A", "C", "G")
do.call(expand.grid, rep(list(x), 3))