login
A106096
Primes with maximal digit 6.
7
61, 163, 263, 461, 463, 563, 601, 613, 631, 641, 643, 653, 661, 1061, 1063, 1163, 1361, 1601, 1613, 1621, 1663, 2063, 2161, 2621, 2633, 2663, 3061, 3163, 3361, 3461, 3463, 3613, 3623, 3631, 3643, 4261, 4363, 4463, 4561, 4603, 4621, 4643, 4651, 4663, 5261
OFFSET
1,1
MATHEMATICA
Select[Prime[Range[300]], Max[IntegerDigits[ # ]]==6&]
CROSSREFS
Sequence in context: A044774 A138627 A161853 * A142482 A007488 A142538
KEYWORD
nonn,base,easy
AUTHOR
Zak Seidov, May 07 2005
STATUS
approved