|
Search: id:A099826
|
|
|
| A099826 |
|
Sum of the first 3^n primes. |
|
+0
3
|
|
| 2, 10, 100, 1264, 15116, 171148, 1864190, 19697700, 203534530, 2067129306, 20706364528, 205144046742, 2014349179358, 19632546354498, 190150622868298, 1831906588192414, 17567504017456404, 167794196312059488, 1597037992049539274
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
LINKS
|
C. Hilliard, Sum first 2^n Primes. [Link corrected by Alexey Beshenov, Jan 25 2009]
|
|
MATHEMATICA
|
NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; k = p = 1; s = 0; Do[ While[p = NextPrim[p]; s = s + p; k < 10^n, k++ ]; k++; Print[s], {n, 0, 16}]
|
|
CROSSREFS
|
Cf. A000040, A006988, A007504, A099824, A099825.
Sequence in context: A087799 A124214 A098279 this_sequence A063959 A101686 A074109
Adjacent sequences: A099823 A099824 A099825 this_sequence A099827 A099828 A099829
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 25 2004
|
|
EXTENSIONS
|
More terms from Cino Hilliard (hillcino368(AT)gmail.com), Jan 14 2006
|
|
|
Search completed in 0.004 seconds
|
