inst/doc/splotsHOWTO.R

In splots: Visualization of high-throughput assays in microtitre plate or slide format

### R code from vignette source 'splotsHOWTO.Rnw'

###################################################
### code chunk number 1: exampledata
###################################################
library("splots")
screen = lapply(1:12, function(i) cumsum(rnorm(384)))
names(screen) = paste("plate", LETTERS[seq(along=screen)])


###################################################
### code chunk number 2: splotsHOWTO.Rnw:36-37
###################################################
plotScreen(screen, ncol=3)


###################################################
### code chunk number 3: splotsHOWTO.Rnw:44-45
###################################################
plotScreen(screen, ncol=2, do.legend=FALSE)


###################################################
### code chunk number 4: splotsHOWTO.Rnw:52-55
###################################################
plotScreen(screen, ncol=4, fill=c("white", "darkblue"), 
           main="Example data", 
           legend.label=expression(bar(x) == sum(x[i], i==1, n)))


###################################################
### code chunk number 5: splotsHOWTO.Rnw:62-66
###################################################
for(i in seq(along=screen))
  screen[[i]][sample(384, 5)] = NA
plotScreen(screen, ncol=4, do.names=FALSE, 
           main="Example data", legend.label="Legend label")


###################################################
### code chunk number 6: sessionInfo
###################################################
toLatex(sessionInfo())