login
A364250
a(n) = A364249(n) mod 2.
2
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0
OFFSET
1
FORMULA
a(n) = A000035(A349348(n)) = A000035(A364249(n)).
PROG
(PARI)
A359374(n) = !(((n%2)&&!(n%3))||!(n%4));
memoA364249 = Map();
A364249(n) = if(1==n, 1, my(v); if(mapisdefined(memoA364249, n, &v), v, v = -sumdiv(n, d, if(d<n, A359374(n/d)*A364249(d), 0)); mapput(memoA364249, n, v); (v)));
A364250(n) = (A364249(n)%2);
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 17 2023
STATUS
approved