DATA MINING
Desktop Survival Guide by Graham Williams |
|||||
library(pixmap) # From the addlogo example x <- read.pnm(system.file("pictures/logo.ppm", package="pixmap")[1]) fg <- matrix(c(0,1,0,1,0,.05,0,.05), ncol=4, byrow=TRUE) split.screen(fg) screen(1) plot(rnorm(100)) screen(2) addlogo(x,c(0,1),c(0,1)) |