|
| |
|
|
A099826
|
|
Sum of the first 3^n primes.
|
|
2
| |
|
|
2, 10, 100, 1264, 15116, 171148, 1864190, 19697700, 203534530, 2067129306, 20706364528, 205144046742, 2014349179358, 19632546354498, 190150622868298, 1831906588192414, 17567504017456404, 167794196312059488, 1597037992049539274
(list; graph; refs; listen; history; internal format)
|
|
|
|
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 * A063959 A101686 A188193
Adjacent sequences: A099823 A099824 A099825 * 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
|
| |
|
|