%I #14 Aug 29 2020 02:15:15
%S 0,1,1,0,2,2,0,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,
%T 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,0,0,0,2,2,0,1,
%U 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,0,2,2,0,0,0,0,2,2
%N The relative direction (0=straight ahead, 1=turn right, 2=turn left) of the Peano curve A163334 at point n.
%C a(9*n) = a(81*n) for all n.
%H Antti Karttunen, <a href="/A163536/b163536.txt">Table of n, a(n) for n = 1..59049</a>
%F a(n) = A163241((A163534(n+1)-A163534(n)) modulo 4).
%F a(n) = A014681(A163537(n)).
%o (Scheme:) (define (A163536 n) (A163241 (modulo (- (A163534 (1+ n)) (A163534 n)) 4)))
%Y Cf. A163534 (direction), A163537 (transposed relative).
%K nonn
%O 1,5
%A _Antti Karttunen_, Aug 01 2009
%E Name corrected by _Kevin Ryde_, Aug 29 2020