login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A106094 Primes with maximal digit = 8. 7
83, 181, 281, 283, 383, 487, 587, 683, 787, 811, 821, 823, 827, 853, 857, 863, 877, 881, 883, 887, 1087, 1181, 1187, 1283, 1381, 1481, 1483, 1487, 1583, 1783, 1787, 1801, 1811, 1823, 1831, 1847, 1861, 1867, 1871, 1873, 1877 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

Res:= NULL: count:= 0:

C:= {$1..8}: B:= {8}:

for d from 2 while count < 100 do

   B:= map(t -> 10*t+8, C) union map(t -> seq(10*t+j, j=0..7), B);

   C:= map(t -> seq(10*t+i, i=0..8), C);

   V:= select(isprime, B);

   count:= count + nops(V);

   Res:= Res, op(sort(convert(V, list)));

od:

Res; # Robert Israel, May 01 2019

MATHEMATICA

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

CROSSREFS

Sequence in context: A106962 A137364 A182479 * A142443 A044415 A044796

Adjacent sequences:  A106091 A106092 A106093 * A106095 A106096 A106097

KEYWORD

nonn,base

AUTHOR

Zak Seidov, May 07 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 18 04:48 EST 2020. Contains 332011 sequences. (Running on oeis4.)