|
| |
|
|
A144714
|
|
Left-truncatable primes that contain one or more zero digits.
|
|
1
| |
|
|
103, 107, 307, 503, 607, 907, 1013, 1097, 1103, 1307, 1607, 1907, 2003, 2017, 2053, 2083, 2503, 3023, 3037, 3067, 3083, 3307, 3607, 3907, 4003, 4007, 4013, 4073, 5003, 5023, 5107, 5503, 6007, 6037, 6043, 6047, 6053, 6067, 6073, 6607, 6907, 7013, 7043
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| These are the terms in sequence A033664 that are not in A024785. This sequence is infinitely long.
|
|
|
REFERENCES
| Angell, I. O. and Godwin, H. J. "On Truncatable Primes." Math. Comput. 31, 265-267, 1977.
|
|
|
LINKS
| H. J. Smith, Table of n, a(n) for n = 1..10000
H. J. Smith, Link to programs to generate truncatable primes.
Eric Weisstein's World of Mathematics, Truncatable Prime
Index entries for sequences related to truncatable primes
|
|
|
PROG
| (PARI) zeroin(z)={until(z==0, q=z\10; r=z-10*q; if(r==0, return(1)); z=q; ); return(0); }
{fileO="b144714.txt"; v=vector(15000); v[1]=2; v[2]=3; v[3]=5; v[4]=7; j=4; m=0;
p10=1; until(0, p10*=10; j0=j; for(k=1, 9, k10=k*p10; for(i=1, j0, z=k10+v[i];
if(isprime(z), j++; v[j]=z; if(zeroin(z), m++;
write(fileO, m, " ", z); if(m==10000, break(3)); ))))); }
|
|
|
CROSSREFS
| Cf. A020994, A024770, A024785, A033664, A132394.
Sequence in context: A165294 A046076 A178527 * A140817 A066131 A095639
Adjacent sequences: A144711 A144712 A144713 * A144715 A144716 A144717
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 08 2008
|
| |
|
|
