login
A371689
Main diagonal of A365495: parity of the n-th term in the trajectory of n under the A014682 map.
5
1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1
OFFSET
1
COMMENTS
See A365495 for more information and links.
FORMULA
a(n) = A368300(n) mod 2 = A365495(n,n-1).
MATHEMATICA
Table[Mod[Nest[If[OddQ[#], (3*#+1)/2, #/2] &, n, n-1], 2], {n, 100}]
CROSSREFS
Parity of A368300.
Sequence in context: A074937 A267418 A263919 * A362129 A267520 A114915
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Apr 04 2024
STATUS
approved