%I A024785
%S A024785 2,3,5,7,13,17,23,37,43,47,53,67,73,83,97,113,137,167,173,197,223,283,
%T A024785 313,317,337,347,353,367,373,383,397,443,467,523,547,613,617,643,647,653,
%U A024785 673,683,743,773,797,823,853,883,937,947,953,967,983,997,1223,1283,1367
%N A024785 Left-truncatable primes: every suffix is prime and no digits are zero.
%D A024785 Angell, I. O. and Godwin, H. J. "On Truncatable Primes." Math. Comput. 
               31, 265-267, 1977.
%H A024785 N. J. A. Sloane, <a href="b024785.txt">Table of n, a(n) for n = 1..4260</
               a> (The full list, based on the De Geest web site)
%H A024785 <a href="Sindx_Tri.html#tprime">Index entries for sequences related to 
               truncatable primes</a>
%H A024785 P. De Geest, <a href="http://www.worldofnumbers.com/truncat.htm">The 
               list of 4260 left-truncatable primes</a>
%H A024785 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               TruncatablePrime.html">Link to a section of The World of Mathematics.</
               a>
%o A024785 (PARI) {v=vector(4260);v[1]=2;v[2]=3;v[3]=5;v[4]=7;i=0;j=4; until(i>=j,
               i++;p=v[i];P10=10^(1+log(p)\log(10)); for(k=1,9,z=k*P10+p;if(isprime(z),
               j++;v[j]=z;))); s=vector(4260);s=vecsort(v);for(i=1,j,write("b024785.txt",
               i," ",s[i]););} [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), 
               Sep 19 2008]
%Y A024785 Cf. A033664, A032437, A020994, A024770 (right-trucatable primes), A052023, 
               A052024, A052025, A050986, A050987.
%Y A024785 Sequence in context: A067905 A042993 A033664 this_sequence A069866 A125772 
               A001000
%Y A024785 Adjacent sequences: A024782 A024783 A024784 this_sequence A024786 A024787 
               A024788
%K A024785 nonn,base,fini
%O A024785 1,1
%A A024785 David W. Wilson (davidwwilson(AT)comcast.net)
%E A024785 Comment from Eric Weisstein (eric(AT)weisstein.com): last term is a(4260)=357686312646216567629137 
               (Baillie, 1995).