login
A092909
Interpolate 0's between each pair of digits of n-th prime.
2
2, 3, 5, 7, 101, 103, 107, 109, 203, 209, 301, 307, 401, 403, 407, 503, 509, 601, 607, 701, 703, 709, 803, 809, 907, 10001, 10003, 10007, 10009, 10103, 10207, 10301, 10307, 10309, 10409, 10501, 10507, 10603, 10607, 10703, 10709, 10801, 10901, 10903, 10907, 10909
OFFSET
1,1
LINKS
FORMULA
a(n) = A051022(A000040(n)). - Andrew Howroyd, Feb 12 2020
MATHEMATICA
Table[FromDigits[Riffle[IntegerDigits[p], 0]], {p, Prime[Range[50]]}] (* Harvey P. Dale, Aug 15 2021 *)
PROG
(PARI) a(n)={fromdigits(concat([[0, d] | d<-digits(prime(n))]))} \\ Andrew Howroyd, Feb 12 2020
CROSSREFS
Sequence in context: A318202 A076406 A171050 * A080437 A092908 A050784
KEYWORD
nonn,base
AUTHOR
Jorge Coveiro, Apr 15 2004
EXTENSIONS
Name clarified and terms a(31) and beyond from Andrew Howroyd, Feb 12 2020
STATUS
approved