OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
MATHEMATICA
A373864[n_] := #/2^IntegerExponent[#, 2] & [9*n + 8];
Array[A373864, 100, 0] (* Paolo Xausa, Aug 19 2024 *)
PROG
(PARI) a(n) = n=9*n+8; n>>valuation(n, 2);
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jonas Kaiser, Jun 19 2024
STATUS
approved