iplotCurves within R Markdown

In qtlcharts: Interactive Graphics for QTL Experiments

This document serves to test the R/qtlcharts function iplotCurves.

knitr::opts_chunk$set(fig.width=9, fig.height=6)
set.seed(69891250)
library(qtl)
library(qtlcharts)
data(grav)

Reduce size of data.

grav$pheno <- grav$pheno[,seq(1, nphe(grav), by=5)]
times <- as.numeric(sub("T", "", phenames(grav)))/60

iplotCurves(grav$pheno, times,
            grav$pheno[,c("T30", "T240")],
            grav$pheno[,c("T240", "T480")],
            chartOpts=list(curves_xlab="Time", curves_ylab="Root tip angle",
                           scat1_xlab="Angle at 30 min", scat1_ylab="Angle at 4 hrs",
                           scat2_xlab="Angle at 4 hrs", scat2_ylab="Angle at 8 hrs"))

qtlcharts documentation built on Jan. 8, 2022, 1:06 a.m.