OFFSET
1,1
COMMENTS
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
EXAMPLE
3413 is a member, as it is a prime and the first and the last digits are both 3.
MATHEMATICA
se3Q[n_]:=Module[{idn=IntegerDigits[n]}, idn[[1]]==idn[[-1]]==3]; Select[ Prime[ Range[3300]], se3Q] (* Harvey P. Dale, Jul 24 2019 *)
PROG
(PARI) { n=-1; t=log(10); forprime (p=2, 5*10^5, if ((p-10*(p\10)) == 3 && (p\10^(log(p)\t)) == 3, write("b062333.txt", n++, " ", p); if (n==1000, break)) ) } \\ Harry J. Smith, Aug 05 2009
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Amarnath Murthy, Jun 21 2001
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), Jun 29 2001
Offset changed by Andrew Howroyd, Sep 17 2024
STATUS
approved