A283609 Numbers whose largest decimal digit is 6.

6, 16, 26, 36, 46, 56, 60, 61, 62, 63, 64, 65, 66, 106, 116, 126, 136, 146, 156, 160, 161, 162, 163, 164, 165, 166, 206, 216, 226, 236, 246, 256, 260, 261, 262, 263, 264, 265, 266, 306, 316, 326, 336, 346, 356, 360, 361, 362, 363, 364, 365, 366, 406, 416, 426

Offset: 1

Author

Jaroslav Krizek, Mar 19 2017

Keywords

• nonn
• base

Comments

Numbers n such that A054055(n) = 6.

Number of terms less than 10^n is 7^n - 6^n.

Prime terms are in A106096.

Links

• Muniru A Asiru, Table of n, a(n) for n = 1..5000

Crossrefs

Cf. A054055, A106096.

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), this sequence (k = 6), A283610 (k = 7), A283611 (k = 8), A011539 (k = 9).

Programs

GAP

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

Magma

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

Mathematica

Select[Range[1000], Max[IntegerDigits[#]] == 6 &] (* Giovanni Resta, Mar 19 2017 *)

PARI

for(n=1, 500, if(vecmax(digits(n))==6, print1(n,", "))) \\ Indranil Ghosh, Mar 19 2017

Python

from sympy.ntheory.factor_ import digits
print([n for n in range(1, 501) if max(digits(n)[1:])==6]) # Indranil Ghosh, Mar 19 2017