OFFSET
0
LINKS
Brad Klee, A new space-filling dragon curve theorem, on community.wolfram.com/groups, Jul 10, 2024
MAPLE
b:= n-> `if`(n<3, 1, b(iquo(n, 3))+`if`(n mod 9 in {0, 4, 8}, 0, 1)):
a:= n-> b(n+1)-b(n):
seq(a(n), n=0..99); # Alois P. Heinz, Jul 14 2024
PROG
CROSSREFS
KEYWORD
sign,base,less
AUTHOR
M. F. Hasler, Jul 13 2024
STATUS
approved