|
| |
|
|
A020472
|
|
Primes that contain digits 8 and 9 only.
|
|
25
| |
|
|
89, 8999, 89899, 89989, 98899, 98999, 99989, 888989, 898889, 989999, 998989, 8888989, 8889889, 8988989, 8989999, 8998889, 8999899, 9888889, 9889889, 9899999, 9989899, 9999889, 88888999, 88898989, 88989899, 89888989, 89889889, 89898889
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Or, primes with minimal digit 8.
|
|
|
MATHEMATICA
| Select[Prime[Range[80000]], Min[IntegerDigits[ # ]]==8&] - Zak Seidov (zakseidov(AT)yahoo.com), May 07 2005
|
|
|
PROG
| (PARI) for(nd=1, 9, p=vector(nd, i, 10^(nd-i))~; forvec(v=vector(nd, i, [8+(i==nd), 9]), isprime(v*p) & print1(v*p", "))) [From M. F. Hasler (www.univ-ag.fr/~mhasler), Mar 18 2010]
|
|
|
CROSSREFS
| Cf. A020449 (digits 0 & 1), ..., A020472 (digits 7 & 9). [From M. F. Hasler (www.univ-ag.fr/~mhasler), Mar 18 2010]
Sequence in context: A017805 A017752 A100419 * A093948 A116254 A086695
Adjacent sequences: A020469 A020470 A020471 * A020473 A020474 A020475
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), Jan 26 2008 at the suggestion of Lekraj Beedasy
|
| |
|
|
