A089622 a(n) = n^n + n-th prime.
3, 7, 32, 263, 3136, 46669, 823560, 16777235, 387420512, 10000000029, 285311670642, 8916100448293, 302875106592294, 11112006825558059, 437893890380859422, 18446744073709551669, 827240261886336764236, 39346408075296537575485, 1978419655660313589124046
Offset: 1
Programs
-
Mathematica
Table[n^n + Prime[n], {n, 1, 25}] (* Amiram Eldar, Jun 26 2024 *)
-
PARI
primeppwr2(n) = { my(y, sr=0); for(x=1,n, y=x^x+prime(x); print1(y", "); sr+=1./y; ); print(); print(sr) }
Formula
Extensions
a(18)-a(19) from Amiram Eldar, Jun 26 2024
Comments