|
| |
|
|
A145197
|
|
Partial sums of number of primes < nth-prime p such that p+2 is prime.
|
|
1
| |
|
|
0, 1, 3, 5, 8, 11, 15, 19, 23, 28, 33, 38, 44, 50, 56, 62, 69, 76, 83, 91, 99, 107, 115, 123, 131, 140, 149, 159, 169, 179, 189, 199, 210, 221, 233, 245, 257, 269, 281, 293, 306, 319, 333, 347, 362, 377, 392, 407, 423, 439, 455, 472, 489, 506, 523, 540, 558, 576
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| Partial sums of A082462. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 06 2008]
|
|
|
MAPLE
| isA001359 := proc(p) if isprime(p) and isprime(p+2) then 1; else 0; fi; end: A082462 := proc(n) add( isA001359(ithprime(i)), i=1..n) ; end: A145197 := proc(n) add( A082462(i), i=1..n) ; end: for n from 1 to 200 do printf("%d, ", A145197(n)) ; od: [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 06 2008]
|
|
|
CROSSREFS
| Sequence in context: A002821 A046992 A001463 * A024169 A078126 A024206
Adjacent sequences: A145194 A145195 A145196 * A145198 A145199 A145200
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Oct 04 2008
|
|
|
EXTENSIONS
| Corrected and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 06 2008
|
| |
|
|
