emf.rna.image.plot <- function(img){
if(is.list(img)) img = unlist(img);
img.matrix = matrix(rev( img ), nrow = 20, byrow = TRUE);
img.matrix = apply(img.matrix, 2, rev);
image(x = img.matrix, col=gray.colors(100));
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.