A101310 Sum(prime(k)*10^(k),k=1..n).

0, 20, 320, 5320, 75320, 1175320, 14175320, 184175320, 2084175320, 25084175320, 315084175320, 3415084175320, 40415084175320, 450415084175320, 4750415084175320, 51750415084175320, 581750415084175320

Offset

0,2

Links

Table of n, a(n) for n=0..16.

Maple

seq( ( sum((ithprime(x)*10^(x), x=1..a))), a=1..20);

Mathematica

Accumulate[Join[{0}, Table[Prime[k]10^k, {k, 30}]]] (* Harvey P. Dale, Dec 18 2016 *)

Crossrefs

Sequence in context: A111778 A024387 A307173 * A229775 A159648 A353106

Adjacent sequences: A101307 A101308 A101309 * A101311 A101312 A101313

Keyword

nonn

Author

Jorge Coveiro, Dec 22 2004

Status

approved