A088731 Numbers of the form p^p - 3 where p is prime.

1, 24, 3122, 823540, 285311670608, 302875106592250, 827240261886336764174, 1978419655660313589123976, 20880467999847912034355032910564, 2567686153161211134561828214731016126483466

Offset: 1

Author

Cino Hilliard, Nov 23 2003

Keywords

• nonn

Comments

Sum of reciprocals = 1.041988188435472536468359944..

Programs

Mathematica

#^#-3&/@Prime[Range[20]] (* Harvey P. Dale, Jun 09 2019 *)

PARI

ptop(n,m) = { sr=0; forprime(x=2,n, y=x^x-m; print1(y","); sr += 1.0/y; ); print(); print(sr) }