%I #17 Oct 11 2022 10:44:51

%S 2,32,532,7532,117532,1417532,18417532,208417532,2508417532,

%T 31508417532,341508417532,4041508417532,45041508417532,

%U 475041508417532,5175041508417532,58175041508417532,648175041508417532

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

%H Robert Israel, <a href="/A092844/b092844.txt">Table of n, a(n) for n = 1..996</a>

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

%t Array[Sum[Prime[k]*10^(k - 1), {k, #}] &, 17] (* _Michael De Vlieger_, Jun 22 2022 *)

%t Accumulate[Table[Prime[n]10^(n-1),{n,20}]] (* _Harvey P. Dale_, Oct 11 2022 *)

%o (PARI) a(n) = fromdigits(Vecrev(primes(n))); \\ _Kevin Ryde_, Jun 22 2022

%Y Cf. A038394, A135483, A287353.

%K nonn,easy

%O 1,1

%A _Jorge Coveiro_, Apr 15 2004