OFFSET
1,1
COMMENTS
All concatenations are divisible by the n-th prime.
a(n)/prime(n) gives a number of the form concatenate[(10^k)_prime(n)] for some k.
Subsequence of A053061.
Except for 24 and 525, a(n) have final decimal digit 1 or 9.
FORMULA
a(n) = Concatenate [prime(n)_A001248(n)].
a(n) = p*(p+10^A055642(p^2)) with p = prime(n). - Peter Luschny, Jul 17 2016
EXAMPLE
For n=4, prime(4) = 7 (the fourth prime number) and 7^2 = 49. These are concatenated to get a(4) = 749. - Michael B. Porter, Jul 16 2016
MAPLE
seq(n*(n+10^(1+ilog10(n^2))), n=select(k->isprime(k), [$1..137])); # Peter Luschny, Jul 16 2016
MATHEMATICA
Table[FromDigits@ Flatten@ Map[IntegerDigits, {#, #^2}] &@ Prime@ n, {n, 33}] (* Michael De Vlieger, Jul 13 2016 *)
PROG
(PARI) a(n) = eval(Str(prime(n), prime(n)^2)) \\ Felix Fröhlich, Jul 14 2016
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Giovanni Teofilatto, Jul 13 2016
STATUS
approved