raster_view
htmltools
raster_str(x, width = 480, height = 480, interpolate = FALSE) raster_view(code)
r <- as.raster(matrix(hcl(0, 80, seq(50, 80, 10)), nrow = 4, ncol = 5)) code <- raster_str(r, width = 50, height = 50) if (interactive() && require("htmltools")) { raster_view(code = code) }
Run the code above in your browser using DataLab