|
DATA MINING
Desktop Survival Guide by Graham Williams |
|
|||
Adding a Logo to a Graphic |
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))
|