[go: up one dir, main page]

login
A101185
Complement of A101184.
1
2, 4, 5, 8, 9, 10, 13, 18, 19, 20, 21, 24, 29, 30, 33, 38, 45, 48, 49, 50, 51, 52, 59, 64, 65, 68, 73, 80, 87, 88, 89, 92, 99, 100, 105, 108, 115, 120, 121, 128, 137, 142, 145, 150, 153, 154, 159, 174, 175, 176, 177, 178, 179, 184, 191, 194, 205, 208, 215, 216, 223
OFFSET
1,1
COMMENTS
Not of the form n + pi(n) + pi(pi(n)) + pi(pi(pi(n))) + pi(pi(pi(pi(n)))) + ...
MATHEMATICA
f[n_] := Plus @@ FixedPointList[ PrimePi, n]; Complement[ Range[225], Table[ f[n], {n, 165}]]
CROSSREFS
Cf. A000720.
Sequence in context: A362295 A069011 A353386 * A045702 A005658 A166021
KEYWORD
nonn
AUTHOR
STATUS
approved