OFFSET
1,1
LINKS
EXAMPLE
n=1: p=prime(1)=2; p mod 10 = 2, prime(1+2) = 5 = a(1);
n=6: p=prime(6)=13; p mod 10 = 3, prime(6+3) = 23 = a(6).
MATHEMATICA
Table[Prime[n+Mod[Prime[n], 10]], {n, 100}]
PROG
(PARI) a(n)=prime(n+prime(n)%10)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Zak Seidov, Jan 23 2015
STATUS
approved