login
A040053
a(n) is 1 if and only if Ramanujan's tau(n) > 0.
1
1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 1, 1
OFFSET
1,1
LINKS
FORMULA
a(n) = [A000594(n) > 0]. - Sean A. Irvine, Mar 05 2021
MATHEMATICA
Array[Boole[RamanujanTau[#] > 0] &, 105] (* Michael De Vlieger, Mar 05 2021 *)
PROG
(PARI) a(n) = ramanujantau(n) > 0; \\ Michel Marcus, Mar 05 2021
CROSSREFS
Cf. A000594.
Sequence in context: A326822 A088517 A325897 * A267513 A004569 A361116
KEYWORD
nonn
EXTENSIONS
More terms from Sean A. Irvine, Mar 05 2021
STATUS
approved