Nothing
This document serves to test the
R/qtlcharts function iheatmap
.
knitr::opts_chunk$set(fig.width=9, fig.height=6) set.seed(69891250) library(qtlcharts)
n <- 101 x <- y <- seq(-2, 2, len=n) z <- matrix(ncol=n, nrow=n) for(i in seq(along=x)) for(j in seq(along=y)) z[i,j] <- x[i]*y[j]*exp(-x[i]^2 - y[j]^2) iheatmap(z, x, y)
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.