OFFSET
1,1
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..10000
EXAMPLE
a(11)= 97 which is prime. Removing the leftmost digit gives 7, also prime.
a(28)= 311 which is prime. Removing the leftmost digit gives 11, also prime.
MAPLE
KD:= proc() local a, b, c, d; a:=ithprime(n); b:=length(a); c:=floor(a/(10^(b-1))); d:=a-c*(10^(b-1)); if isprime(d) then return(a):fi; end:seq(KD(), n=1..5000);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Oct 13 2013
STATUS
approved