Img <- matrix(c(0,0,0,255,255,255,
0,0,0,255,255,255,
0,0,0,255,255,255,
255,255,255,0,0,0,
255,255,255,0,0,0,
255,255,255,0,0,0),
byrow = TRUE, ncol=6)
ng.img <- ng_image_array_gray("Test",
cbind(as.vector(Img),as.vector(Img)),6,6,FALSE)
ng.img
## See demos and vignette
Run the code above in your browser using DataLab