OFFSET
0,1
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..10000
EXAMPLE
a(5) = prime(6) = 13.
a(55) = 1(3+1)3 = 143.
MAPLE
a:= n-> (l-> add(ithprime(l[i]+1)*10^(i-1),
i=1..nops(l)))(convert(n, base, 10)):
seq(a(n), n=0..80); # Alois P. Heinz, Aug 27 2015
MATHEMATICA
Table[FromDigits[Prime[(IntegerDigits[n] + 1)]], {n, 0, 70}] (* Stefan Steinerberger, Mar 27 2006 *)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Jorge Coveiro, Dec 26 2004
EXTENSIONS
More terms from Stefan Steinerberger, Mar 27 2006
STATUS
approved