A088816 - OEIS

%I #8 Sep 22 2014 17:04:48

%S 2,25,3123,823541,285311670609,302875106592251,827240261886336764175,

%T 1978419655660313589123977,20880467999847912034355032910565,

%U 2567686153161211134561828214731016126483467

%N Numbers of the form p^p - 2 where p is prime.

%C Sum of reciprocals = 0.5403214192032919719402677251

%F a(n) = A088730(n)-1=A088731(n)+1. - _R. J. Mathar_, Apr 26 2007

%t #^#-2&/@Prime[Range[10]] (* _Harvey P. Dale_, Sep 22 2014 *)

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

%K nonn

%O 1,1

%A _Cino Hilliard_, Nov 23 2003