Nothing
This document serves to test the
R/qtlcharts function itimeplot.
set.seed(69891250) library(qtl) library(qtlcharts)
n_pts <- 100 x <- seq(as.POSIXct("1969-05-01"), as.POSIXct("1969-05-04"), length=n_pts) grp <- sample(1:3, n_pts, replace=TRUE) y <- rnorm(n_pts, grp) + rnorm(n_pts) itimeplot(x, y, grp)
x <- seq(as.POSIXct("1969-05-01"), as.POSIXct("1969-05-02"), length=n_pts) itimeplot(x, y, grp, chartOpts=list(xlab="Time"))
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.