|
Search: id:A103545
|
|
|
| A103545 |
|
Largest n-digit zeroless prime with nonprime digits. |
|
+0
1
|
|
| 89, 991, 9949, 99991, 999961, 9999991, 99999989, 999999491, 9999999881, 99999999689, 999999999989, 9999999999161, 99999999999481, 999999999999989, 9999999999999641, 99999999999999961, 999999999999999989
(list; graph; listen)
|
|
|
OFFSET
|
2,1
|
|
|
MATHEMATICA
|
PrevPrim[n_] := Block[{k = n - 1}, While[ !PrimeQ[k], k-- ]; k]; f[n_] := Block[{pp = PrevPrim[ 10^n]}, While[ Union[ Join[{1, 4, 6, 8, 9}, IntegerDigits[pp]]] != {1, 4, 6, 8, 9}, pp = PrevPrim[pp]]; pp]; Table[ f[n], {n, 2, 18}] (from Robert G. Wilson v Mar 26 2005)
|
|
CROSSREFS
|
Cf. A103544.
Sequence in context: A097155 A158716 A093289 this_sequence A118368 A105719 A054680
Adjacent sequences: A103542 A103543 A103544 this_sequence A103546 A103547 A103548
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Ray G. Opao (1260(AT)email.com), Mar 22 2005
|
|
EXTENSIONS
|
More terms from Jonathan Vos Post (jvospost3(AT)gmail.com), Mar 23 2005
a(7) to a(12) from Jonathan Vos Post (jvospost3(AT)gmail.com), Mar 23 2005
a(13) to a(18) from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 26 2005
|
|
|
Search completed in 0.002 seconds
|
