Nothing
get.Mutated.Positions <-
function (mutation.matrix){
return (list(names = names(which(colSums(mutation.matrix) >0))
, counts = colSums(mutation.matrix)))
}
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.