|
Search: id:A086168
|
|
|
| A086168 |
|
Sum of the first n upper twin primes. |
|
+0
1
|
|
| 5, 12, 25, 44, 75, 118, 179, 252, 355, 464, 603, 754, 935, 1128, 1327, 1556, 1797, 2068, 2351, 2664, 3013, 3434, 3867, 4330, 4853, 5424, 6025, 6644, 7287, 7948, 8759, 9582, 10411, 11270, 12153, 13174, 14207, 15258, 16321, 17414, 18567
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
For n = 4 we have twin prime pairs (3,5) (5,7) (11,13) (17,19) and 5+7+13+19 = 44
|
|
MATHEMATICA
|
lst={}; s=0; Do[p=Prime[n]; If[PrimeQ[p-2], s+=p; AppendTo[lst, s]], {n, 6!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 30 2008]
|
|
PROGRAM
|
(PARI) addnexttwin(n)= { s=0; for(x=1, n, if(prime(x+1)-prime(x)==2, s=s+prime(x+1); print1(s", ")) ) }
|
|
CROSSREFS
|
Sequence in context: A108314 A079425 A081501 this_sequence A108201 A038254 A073095
Adjacent sequences: A086165 A086166 A086167 this_sequence A086169 A086170 A086171
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Aug 25 2003
|
|
|
Search completed in 0.002 seconds
|
