A101185 Complement of A101184.

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)))) + ...

Links

Table of n, a(n) for n=1..61.

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

Adjacent sequences: A101182 A101183 A101184 * A101186 A101187 A101188

Keyword

nonn

Author

Jonathan Vos Post and Robert G. Wilson v, Dec 03 2004

Status

approved