The picture is easily generated using the following R code:
shades <- seq(0, 1, length.out =50)
m.shades <- matrix(rep(shades, 50), 50, 50)
shades.of.grey <- grey(shades)
png("shades.png")
image(m.shades, col=shades.of.grey)
dev.off()
lunes, 16 de febrero de 2015
50 shades of grey
The readers of the novel series on unconventional desires may enjoy this little picture showing (literally) 50 shades of grey:
The picture is easily generated using the following R code:
shades <- seq(0, 1, length.out =50)
m.shades <- matrix(rep(shades, 50), 50, 50)
shades.of.grey <- grey(shades)
png("shades.png")
image(m.shades, col=shades.of.grey)
dev.off()
The picture is easily generated using the following R code:
shades <- seq(0, 1, length.out =50)
m.shades <- matrix(rep(shades, 50), 50, 50)
shades.of.grey <- grey(shades)
png("shades.png")
image(m.shades, col=shades.of.grey)
dev.off()
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario