A106093 Primes with maximal digit = 9.

19, 29, 59, 79, 89, 97, 109, 139, 149, 179, 191, 193, 197, 199, 229, 239, 269, 293, 349, 359, 379, 389, 397, 409, 419, 439, 449, 479, 491, 499, 509, 569, 593, 599, 619, 659, 691, 709, 719, 739, 769, 797, 809, 829, 839, 859, 907, 911, 919, 929, 937, 941, 947

Offset

1,1

Comments

Differs from A062679 in 95th term = 1693; A062679(95) = 1691 = 19*89.

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Select[Prime[Range[200]], Max[IntegerDigits[ # ]]==9&]

Prog

(Magma) [p: p in PrimesUpTo(2000) | 9 in Intseq(p)]; // Vincenzo Librandi, Nov 22 2015
(PARI) forprime(p=2, 1e3, if(vecmax(digits(p)) == 9, print1(p, ", "))) \\ Altug Alkan, Nov 22 2015

Crossrefs

Cf. A062679.

Cf. A106100, A106099, A106098, A106097, A106096, A106095, A106094.

Sequence in context: A092600 A106124 A062679 * A084666 A242265 A004618

Adjacent sequences: A106090 A106091 A106092 * A106094 A106095 A106096

Keyword

nonn,base

Author

Zak Seidov and Robert G. Wilson v, May 07 2005

Status

approved