OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..200 (terms below 10^10)
EXAMPLE
285 is a term since both 285 and 286 are in A353543.
MATHEMATICA
q[n_] := DivisorSigma[-1, n] > Pi^2/6 && AllTrue[Most @ Divisors[n], DivisorSigma[-1, #] < Pi^2/6 &]; Position[Partition[Array[q, 4*10^6], 2, 1], {True, True}] // Flatten
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Apr 25 2022
STATUS
approved
