A092844 a(n) = Sum_{k=1..n} prime(k)*10^(k-1).

2, 32, 532, 7532, 117532, 1417532, 18417532, 208417532, 2508417532, 31508417532, 341508417532, 4041508417532, 45041508417532, 475041508417532, 5175041508417532, 58175041508417532, 648175041508417532

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..996

Maple

ListTools:-PartialSums([seq(ithprime(i)*10^(i-1), i=1..30)]); # Robert Israel, Apr 12 2020

Mathematica

Array[Sum[Prime[k]*10^(k - 1), {k, #}] &, 17] (* Michael De Vlieger, Jun 22 2022 *)
Accumulate[Table[Prime[n]10^(n-1), {n, 20}]] (* Harvey P. Dale, Oct 11 2022 *)

Prog

(PARI) a(n) = fromdigits(Vecrev(primes(n))); \\ Kevin Ryde, Jun 22 2022

Crossrefs

Cf. A038394, A135483, A287353.

Sequence in context: A022019 A010045 A052151 * A038394 A068110 A304860

Adjacent sequences: A092841 A092842 A092843 * A092845 A092846 A092847

Keyword

nonn,easy

Author

Jorge Coveiro, Apr 15 2004

Status

approved