### R code from vignette source 'mitoODE-introduction.Rnw' ################################################### ### code chunk number 1: mitoODE-introduction.Rnw:159-160 ################################################### options(width=80) ################################################### ### code chunk number 2: plotspot ################################################### library("mitoODE") spotid <- 1000 plotspot(spotid) y <- readspot(spotid) y[1:5,] ################################################### ### code chunk number 3: pconst ################################################### pconst <- c(g.kim=0.025, g.kmi=0.57, g.mit0=0.05, p.lambda=4) ################################################### ### code chunk number 4: