|
| |
|
|
A116911
|
|
Prime partial sums of pentagonal numbers with prime indices.
|
|
0
| |
|
|
5, 17, 4957, 129277, 2826443, 3861083, 5126483, 9451573, 19811083, 53751743, 68136617, 98729003, 264616831, 388771421, 498157871, 608312141, 682548511, 779346653, 918754301, 1174179079, 1700023891, 2056298683, 2149703411
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| See also: A116994 Prime partial sums of triangular numbers with prime indices. A116995 Pentagonal numbers with prime indices.
|
|
|
FORMULA
| A000040 INTERSECTION {Partial sums of A116995(n)}. (SUM[i=1..k] A000326(A000040(i))) iff in A000040. (SUM[i=1..k] (Prime(i)*(3*Prime(i)-1)/2) iff in A000040.
|
|
|
EXAMPLE
| a(1) = SUM[i=1..1] (Prime(i)*(3*Prime(i)-1)/2) = P(2) = 5.
a(2) = SUM[i=1..2] (Prime(i)*(3*Prime(i)-1)/2) = P(2)+P(3) = 17.
a(3) = SUM[i=1..11] (Prime(i)*(3*Prime(i)-1)/2) = P(2)+P(3)+P(5)+P(7)+P(11)+P(13)+P(17)+P(19)+P(23)+P(29)+P(31) = 4957.
a(4) = P(2)+...+P(103) = 129277.
|
|
|
MAPLE
| P:=n->n*(3*n-1)/2: seq(P(n), n=0..10): a:=proc(n) if isprime(sum(P(ithprime(j)), j=1..n))=true then sum(P(ithprime(j)), j=1..n) else fi end: seq(a(n), n=1..600); - Emeric Deutsch (deutsch(AT)duke.poly.edu), Apr 15 2006
|
|
|
CROSSREFS
| Cf. A000040, A000217, A034953, A085739, A116994, A116995.
Sequence in context: A172996 A085832 A062223 * A097491 A120087 A180135
Adjacent sequences: A116908 A116909 A116910 * A116912 A116913 A116914
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Jonathan Vos Post (jvospost3(AT)gmail.com), Apr 03 2006
|
|
|
EXTENSIONS
| More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Apr 15 2006
|
| |
|
|
