A265671 Directions of edges in a plane-filling curve of order 13.
1, 2, 2, 2, 1, 3, 1, 1, 2, 3, 2, 2, 1, 2, 3, 3, 3, 2, 1, 2, 2, 3, 1, 3, 3, 2, 2, 3, 3, 3, 2, 1, 2, 2, 3, 1, 3, 3, 2, 2, 3, 3, 3, 2, 1, 2, 2, 3, 1, 3, 3, 2, 1, 2, 2, 2, 1, 3, 1, 1, 2, 3, 2, 2, 1, 3, 1, 1, 1, 3, 2, 3, 3, 1, 2, 1, 1, 3, 1, 2, 2, 2, 1, 3, 1, 1, 2, 3, 2, 2, 1, 1, 2, 2, 2, 1, 3, 1, 1, 2, 3, 2, 2, 1, 2, 3, 3
Offset: 1
Keywords
Links
- Joerg Arndt, Table of n, a(n) for n = 1..2197
- Joerg Arndt, First iterate of the curve, Second iterate, Third iterate, Fourth iterate.
- Joerg Arndt, Rendering used for the T-shirt on Neil's 75th birthday (png image, 1716 X 2732 pixel).
- Joerg Arndt, Tile-plus, Tile-minus, Tiling-plus, Complex numeration system.
- Joerg Arndt, Plane-filling curves on all uniform grids, arXiv:1607.02433 [math.CO], (8-July-2016).
- Jörg Arndt and Julia Handl, Edge-covering plane-filling curves on grid colorings: a pedestrian approach, arXiv:2312.00654 [math.CO].
- Index entries for 13-automatic sequences.
Crossrefs
Programs
-
Mathematica
SubstitutionSystem[{1 -> {1,2,2,2,1,3,1,1,2,3,2,2,1}, 2 -> {2,3,3,3,2,1,2,2,3,1,3,3,2}, 3 -> {3,1,1,1,3,2,3,3,1,2,1,1,3}}, {1}, {2}][[1]] (* Paolo Xausa, Jun 11 2024 *)
Comments