Nothing
This document serves to test the
R/qtlcharts function itriplot
.
set.seed(69891250) library(qtl) library(qtlcharts) n <- 100 p <- matrix(runif(3*n), ncol=3) p <- p / colSums(p) g <- sample(1:3, n, replace=TRUE)
itriplot(p, group=g)
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.