x <- read.pnm(system.file("pictures/logo.ppm", package="pixmap")[1])
plot(x)
print(x)
x <- read.pnm(system.file("pictures/logo.pgm", package="pixmap")[1])
plot(x)
x <- read.pnm(system.file("pictures/logo.pbm", package="pixmap")[1])
plot(x)
Run the code above in your browser using DataLab