A043217 - OEIS

%I #10 Dec 29 2023 14:02:21

%S 20,102,120,200,220,302,320,402,420,502,520,602,620,702,720,802,820,

%T 902,920,1002,1020,1102,1120,1200,1220,1302,1320,1402,1420,1502,1520,

%U 1602,1620,1702,1720,1802,1820,1902,1920,2000,2102

%N Numbers k such that 0 and 2 occur juxtaposed in the base-10 representation of k but not of k-1.

%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n],{0,2}]>0 || SequenceCount[ IntegerDigits[ n],{2,0}]>0,1,0],{n,2200}],{0,1}][[;;,2]] (* _Harvey P. Dale_, Dec 29 2023 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_