A138323 a(n) = Sum_{k = 1..n} prime(k)^prime(k + 1).

8, 251, 78376, 1977405119, 34524689549050, 8650450444070886983, 239081086135595395734136, 257829867026393862843621801395

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, May 07 2008

Keywords

• nonn

Examples

			2^3=8
2^3+3^5=8+243=251
2^3+3^5+5^7=8+243+78125=78376
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..75

Crossrefs

Cf. A051674, A053089, A074745.

Programs

Mathematica

P3[n_] := Sum[Prime[i]^Prime[i + 1], {i, 1, n}]; Table[P3[n], {n, 1, 8}]
Accumulate[#[[1]]^#[[2]]&/@Partition[Prime[Range[10]],2,1]] (* Harvey P. Dale, Jan 18 2025 *)

PARI

a(n) = sum(k=1, n, prime(k)^prime(k+1)); \\ Michel Marcus, Jan 25 2016