#Importing MSA file
aln <- import.fasta(system.file("msa/toy2_align.fa", package = "Bios2cor"))
#Generating a random sequence alignment with the same characterics as input file
nb.seq <- length(aln)
nb.pos <- length(aln[[1]])
aln.random <- random.msa(nb.seq = nb.seq, nb.pos = nb.pos)
Run the code above in your browser using DataLab