A283611 Numbers whose largest decimal digit is 8.

8, 18, 28, 38, 48, 58, 68, 78, 80, 81, 82, 83, 84, 85, 86, 87, 88, 108, 118, 128, 138, 148, 158, 168, 178, 180, 181, 182, 183, 184, 185, 186, 187, 188, 208, 218, 228, 238, 248, 258, 268, 278, 280, 281, 282, 283, 284, 285, 286, 287, 288, 308, 318, 328, 338, 348

Offset: 1

Author

Jaroslav Krizek, Mar 19 2017

Keywords

• nonn
• base

Comments

Numbers n such that A054055(n) = 8.

Number of terms less than 10^n is 9^n - 8^n.

Prime terms are in A106094.

Links

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

Crossrefs

Cf. Sequences of numbers whose largest decimal digit is k (for k = 1..9): A007088 (k = 1), A277964 (k = 2), A277965 (k = 3), A277966 (k = 4), A283608 (k = 5), A283609 (k = 6), A283610 (k = 7), this sequence (k = 8), A011539 (k = 9).

Programs

GAP

Filtered([1..400],n->Maximum(ListOfDigits(n))=8); # Muniru A Asiru, Mar 01 2019

Magma

[n: n in [1..100000] | Maximum(Setseq(Set(Sort(&cat[Intseq(n)])))) eq 8]

Maple

f:= proc(n) local L;
  L:= convert(n,base,9);
  if not has(L,8) then return NULL fi;
  add(L[i]*10^(i-1),i=1..nops(L))
end proc:
map(f, [$8..1000]); # Robert Israel, Mar 27 2017

Mathematica

Select[Range@ 350, Max@ IntegerDigits@ # == 8 &] (* Michael De Vlieger, Mar 25 2017 *)

PARI

isok(n) = vecmax(digits(n)) == 8; \\ Michel Marcus, Mar 25 2017