|
%I #12 Feb 05 2021 03:50:09
%S 0,0,1,2,1,0,0,1,2,3,4,3,2,1,0,0,1,2,3,4,5,6,5,4,3,2,1,0,0,1,2,3,4,5,
%T 6,7,8,7,6,5,4,3,2,1,0,0,1,2,3,4,5,6,7,8,9,10,9,8,7,6,5,4,3,2,1,0,0,1,
%U 2,3,4,5,6,7,8,9,10,11,12,11,10,9,8,7,6
%N The x coordinates of the stripe enumeration of N X N where N = {0, 1, 2, ...}.
%C See A319571 for comments and references.
%H <a href="/index/Con#coordinates_2D_curves">Index entries for sequences related to coordinates of 2D curves</a>
%o (Julia)
%o # Function stripe is defined in A319571.
%o function StripeEnumerationX(len)
%o x, y, state = 0, 0, false
%o for n in 0:len
%o print("$x, ")
%o x, y, state = stripe(x, y, state)
%o end
%o end
%o StripeEnumerationX(84)
%Y Cf. A319571 (stripe enumeration), this sequence (stripe x), A319573 (stripe y).
%Y Cf. A319514 (shell enumeration), A319289 (shell x), A319290 (shell y).
%K nonn
%O 0,4
%A _Peter Luschny_, Sep 23 2018
|
