%I #11 Aug 30 2020 04:23:04
%S 0,2,2,0,1,1,0,0,0,0,1,1,0,2,2,0,0,0,0,2,2,0,1,1,0,2,2,0,1,1,0,2,2,0,
%T 0,0,0,2,2,0,1,1,0,0,0,0,1,1,0,2,2,0,1,1,0,2,2,0,1,1,0,0,0,0,1,1,0,2,
%U 2,0,0,0,0,2,2,0,1,1,0,0,0,0,1,1,0,2,2,0,0,0,0,2,2,0,1,1,0,0,0,0,1,1
%N The relative direction (0=straight ahead, 1=turn right, 2=turn left) of the Peano curve A163336 at point n.
%C a(9*n) = a(81*n) for all n.
%H Antti Karttunen, <a href="/A163537/b163537.txt">Table of n, a(n) for n = 1..6561</a>
%F a(n) = A163241((A163535(n+1)-A163535(n)) modulo 4).
%F a(n) = A014681(A163536(n)).
%o (Scheme:) (define (A163537 n) (A163241 (modulo (- (A163535 (1+ n)) (A163535 n)) 4)))
%Y Cf. A163535 (direction), A163536 (transposed relative).
%K nonn
%O 1,2
%A _Antti Karttunen_, Aug 01 2009
%E Name corrected by _Kevin Ryde_, Aug 29 2020