safest_integer<p>```<br>library(tidyverse)<br>z = function(n) {<br> bb = function(i) {<br> x = y = 0<br> for (k in 0:(n - 1)) {<br> x = x + ((floor(i/2^(2 * k))) %% 2) * 2^k<br> y = y + ((floor(i/2^(2 * k + 1))) %% 2) * 2^k<br> }<br> c(x, y)<br> }<br> as.data.frame(t(sapply(0:(4^n - 1), bb)))<br>}<br>ggplot(z(6)) + <br>geom_path(aes(x=V1, y=V2, col=sin(V1/4)+cos(V2/4)), show.legend=F) + <br>scale_colour_gradient(low='orange', high='blue') +<br>theme_void()<br>```</p><p><a href="https://en.wikipedia.org/wiki/Z-order_curve" rel="nofollow noopener noreferrer" translate="no" target="_blank"><span class="invisible">https://</span><span class="ellipsis">en.wikipedia.org/wiki/Z-order_</span><span class="invisible">curve</span></a><br><a href="https://mastodon.social/tags/rstats" class="mention hashtag" rel="nofollow noopener noreferrer" target="_blank">#<span>rstats</span></a> <a href="https://mastodon.social/tags/generativeart" class="mention hashtag" rel="nofollow noopener noreferrer" target="_blank">#<span>generativeart</span></a> <a href="https://mastodon.social/tags/tilingtuesday" class="mention hashtag" rel="nofollow noopener noreferrer" target="_blank">#<span>tilingtuesday</span></a> <a href="https://mastodon.social/tags/rtistry" class="mention hashtag" rel="nofollow noopener noreferrer" target="_blank">#<span>rtistry</span></a> <a href="https://mastodon.social/tags/fractal" class="mention hashtag" rel="nofollow noopener noreferrer" target="_blank">#<span>fractal</span></a></p>