# NOT RUN {
plot(mrfi(1))
library(ggplot2)
plot(mrfi(1)) + geom_tile(fill = "red")
plot(mrfi(1)) + geom_tile(fill = "blue") + theme_void()
plot(mrfi(1)) + geom_text(aes(label = paste0("(",rx,",",ry,")")))
# }
Run the code above in your browser using DataLab