powered by
imagemat(x, col = colorRampPalette(c("white", "black"))(9), las = 1, xlab = "", ylab = "", ...)
x <- matrix(c(1,0,0,0,1, 1,1,0,1,1, 1,0,1,0,1, 1,0,0,0,1, 1,0,0,0,1), ncol=5,byrow=TRUE) imagemat(x)
Run the code above in your browser using DataLab