The purpose of spiraplot
is to create an image on a spiral where the
spiral line gets thicker and thinner (representing dark and light areas
of the image). I’ve seen these types of images before, and this is my
attempt at creating them in R. The engine behind this solution is the
rather splendid simple features {sf}
package.
It is experimental and may not work properly
library(spiraplot)
Use an image of Einstein for demonstration
einstein <- 'https://upload.wikimedia.org/wikipedia/commons/thumb/d/d3/Albert_Einstein_Head.jpg/800px-Albert_Einstein_Head.jpg'
spiraplot(einstein, aspect = "portrait")
You can make interesting images by playing with the spiral_turns
and
spiral_res
purrr::map((3:6)*40,
~spiraplot(einstein, spiral_turns = 40, spiral_res = .x, aspect = "portrait")) %>%
patchwork::wrap_plots()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.