This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A062333 #17 Sep 17 2024 12:06:46 %S A062333 3,313,353,373,383,3023,3083,3163,3203,3253,3313,3323,3343,3373,3413, %T A062333 3433,3463,3533,3583,3593,3613,3623,3643,3673,3733,3793,3803,3823, %U A062333 3833,3853,3863,3923,3943,30013,30103,30113,30133,30203,30223,30253,30293 %N A062333 Primes starting and ending with 3. %C A062333 Intersection of A045709 and A030431. - _Michel Marcus_, Jun 08 2013 %H A062333 Harry J. Smith, <a href="/A062333/b062333.txt">Table of n, a(n) for n = 1..1000</a> %e A062333 3413 is a member, as it is a prime and the first and the last digits are both 3. %t A062333 se3Q[n_]:=Module[{idn=IntegerDigits[n]},idn[[1]]==idn[[-1]]==3]; Select[ Prime[ Range[3300]],se3Q] (* _Harvey P. Dale_, Jul 24 2019 *) %o A062333 (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 %Y A062333 Cf. A062332, A062334, A062335. %K A062333 nonn,base,easy %O A062333 1,1 %A A062333 _Amarnath Murthy_, Jun 21 2001 %E A062333 More terms from Larry Reeves (larryr(AT)acm.org), Jun 29 2001 %E A062333 Offset changed by _Andrew Howroyd_, Sep 17 2024