Nothing
library("pixmap")
## this triggered a bug in R <= 1.9.1
x <- pixmapIndexed(rep(1:8, 9), nrow=6, col=hsv(runif(8),runif(8),runif(8)))
plot(x)
print(x)
file <- tempfile()
write.pnm(x, file=file)
unlink(file)
###**********************************************************
# coercion of indexed -> RGB
x1 <- as(x, "pixmapRGB")
x2 <- as(x1, "pixmapIndexed")
x3 <- as(x2, "pixmapRGB")
stopifnot(all.equal(x, x2))
stopifnot(all.equal(x1, x3))
###**********************************************************
## plotting images with only 1 column or row
## (from bug report by Robert Esswein)
library(pixmap)
## Vertical colorbar:
pm <- pixmapIndexed(matrix(1:16,ncol=1,nrow=16),col=palette())
plot(pm)
## Horizontal colorbar attempt:
pm <- pixmapIndexed(matrix(1:16,ncol=16,nrow=1),col=palette())
plot(pm)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.