OFFSET
1,1
LINKS
Sergio Silva, Teste Numerico.
EXAMPLE
a(1) = 21 = 2 concatenated with 1.
a(2) = 93 = 9 concatenated with 3.
a(3) = 1256 = 125 concatenated with 6.
a(4) = 240111 = 2401 concatenated with 11.
MATHEMATICA
rng=13; A062457=Table[Prime[n]^n, {n, rng}] ; A014284=Accumulate[Join[{1}, Prime[Range[rng-1]]]]; Table[FromDigits[Join[IntegerDigits[A062457[[n]]], IntegerDigits[A014284[[n]]]]], {n, rng}] (* James C. McMahon, Nov 17 2024 *)
PROG
(PARI) s=1; print1(21, ", "); for(n=2, 20, s=s+prime(n-1); print1(prime(n)^n, s, ", "))
CROSSREFS
KEYWORD
base,nonn,less
AUTHOR
Herman Jamke (hermanjamke(AT)fastmail.fm), Oct 05 2006
STATUS
approved