is_dna_sequence <- function(seq){ return((length(grep("[^(A|C|G|T|a|c|g|t)]", seq)) == 0)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.