OFFSET
1,1
COMMENTS
Replace every prime by the concatenation of its divisors. [Lekraj Beedassy, May 29 2009]
LINKS
David F. Marrs, Table of n, a(n) for n = 1..10000
Kevin N. Stone, What number comes next in this sequence, BrainBashers [Archived copy at the Wayback Machine].
FORMULA
MATHEMATICA
Array[10^Floor[1 + Log10[#]] + # &@ Prime[#] &, 47] (* Michael De Vlieger, Apr 05 2021 *)
PROG
(PARI) a(n) = eval(concat(Str(1), Str(prime(n)))) \\ Felix Fröhlich, Apr 05 2021
CROSSREFS
KEYWORD
nonn,base,dumb
AUTHOR
Kevin N. Stone (kevin.stone(AT)brainbashers.com)
STATUS
approved