A140667 Odd composite numbers k for which k = A140607((k-1)/2).
91, 1581, 2465, 8481, 25761, 31609, 33355, 34945, 118405, 146611, 319507, 736291, 994507, 3270403, 3375487, 5176153, 6186403, 6228685, 8650951, 10679131, 22028203, 26017291, 31470211, 33796531, 41710411, 42149971, 42474547, 46672291, 48316969, 49019851, 58986091, 68182003, 69885649
Offset: 1
Keywords
Crossrefs
Programs
-
PARI
f(n) = (eulerphi(2*n+1) + 1 + g(n))/2; \\ A140607 g(n) = sumdiv(2*n+1, d, eulerphi(d)/(t=znorder(Mod(2, d))))*t-t+1; \\ A137576 isok(c) = if (!isprime(c) && (c%2), f((c-1)/2) == c); \\ Michel Marcus, Jan 31 2023
Extensions
More terms from Michel Marcus, Jan 31 2023