OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = prime(A067838(n)).
EXAMPLE
243 and prime(243)=1543, both end with 43.
MATHEMATICA
sltdQ[k_]:=Module[{p=Prime[k]}, Mod[p, 100]==Mod[k, 100]]; Prime[#]&/@ Select[ Range[4000], sltdQ] (* Harvey P. Dale, Dec 26 2021 *)
PROG
(PARI)
cutdigit(a, p, q)=(a%10^q)\10^(p-1)
{for(n=1, 5000, p=prime(n); if(cutdigit(p, 1, 2)==cutdigit(n, 1, 2), print(p)))}
(Magma) [NthPrime(n): n in [1..5*10^3] | n mod 100 eq NthPrime(n) mod 100]; // Bruno Berselli, Nov 19 2013
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antonio Roldán, Nov 18 2013
STATUS
approved