A277964 Numbers whose largest decimal digit is 2.

2, 12, 20, 21, 22, 102, 112, 120, 121, 122, 200, 201, 202, 210, 211, 212, 220, 221, 222, 1002, 1012, 1020, 1021, 1022, 1102, 1112, 1120, 1121, 1122, 1200, 1201, 1202, 1210, 1211, 1212, 1220, 1221, 1222, 2000, 2001, 2002, 2010, 2011, 2012, 2020, 2021, 2022

Offset: 1

Author

Colin Barker, Nov 06 2016

Keywords

• nonn
• base

Comments

Number of terms less than 10^n is 3^n-2^n, i.e., A001047(n). - Chai Wah Wu, Nov 06 2016 [extended by Felix Fröhlich, Nov 07 2016]

Numbers n such that A054055(n) = 2. - Felix Fröhlich, Nov 07 2016

Links

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

Crossrefs

Cf. A007088, A277965, A277966.

Programs

GAP

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

Maple

N:= 6: # to get all terms of at most N digits
R:= 2: B:= {1}: C:= {1,2}:
for  d from 2 to N do B:= map(t -> (10*t,10*t+1),B);
C:= map(t -> (10*t,10*t+1,10*t+2),C);
R:= R, op(sort(convert(C minus B,list)))
od:
R; # Robert Israel, Nov 07 2016

Mathematica

A277964Q = Max[IntegerDigits[#]] == 2 &; Select[Range[2000], A277964Q] (* JungHwan Min, Nov 06 2016 *)

PARI

L=List(); for(n=1, 10000, if(vecmax(digits(n))==2, listput(L, n))); Vec(L)