Nothing
DNAbin2alignment <- function(DNAbin){
write.dna(DNAbin, file = "tempDNAbin.fasta", format = "fasta", colsep = "")
align <- read.alignment(file = "tempDNAbin.fasta", format = "fasta")
unlink("tempDNAbin.fasta")
align
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.