A277965 Numbers whose largest decimal digit is 3.

3, 13, 23, 30, 31, 32, 33, 103, 113, 123, 130, 131, 132, 133, 203, 213, 223, 230, 231, 232, 233, 300, 301, 302, 303, 310, 311, 312, 313, 320, 321, 322, 323, 330, 331, 332, 333, 1003, 1013, 1023, 1030, 1031, 1032, 1033, 1103, 1113, 1123, 1130, 1131, 1132

Offset

1,1

Comments

Number of terms less than 10^n is 4^n - 3^n. - Chai Wah Wu, Nov 06 2016

Links

Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 1000 terms from Colin Barker)

Mathematica

A277965Q = Max[IntegerDigits[#]] == 3 &; Select[Range[1200], A277965Q] (* JungHwan Min, Nov 06 2016 *)

Prog

(PARI) L=List(); for(n=1, 10000, if(vecmax(digits(n))==3, listput(L, n))); Vec(L)
(GAP) Filtered([1..450], n->Maximum(ListOfDigits(n))=3); # Muniru A Asiru, Mar 01 2019

Crossrefs

Cf. A007088, A277964, A277966.

Cf. A005061 (4^n - 3^n).

Cf. A106099 (subsequence of primes).

Sequence in context: A135580 A166566 A011533 * A043501 A277590 A062667

Adjacent sequences: A277962 A277963 A277964 * A277966 A277967 A277968

Keyword

nonn,base

Author

Colin Barker, Nov 06 2016

Status

approved