login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A043997
Numbers k such that 0 and 2 occur juxtaposed in the base-10 representation of k but not of k+1.
0
20, 102, 120, 209, 220, 302, 320, 402, 420, 502, 520, 602, 620, 702, 720, 802, 820, 902, 920, 1002, 1029, 1102, 1120, 1209, 1220, 1302, 1320, 1402, 1420, 1502, 1520, 1602, 1620, 1702, 1720, 1802, 1820, 1902, 1920, 2099, 2102
OFFSET
1,1
MATHEMATICA
Select[Range[2200], MemberQ[Sort/@Partition[IntegerDigits[#], 2, 1], {0, 2}] && !MemberQ[Sort/@Partition[IntegerDigits[#+1], 2, 1], {0, 2}]&] (* Harvey P. Dale, Sep 15 2011 *)
CROSSREFS
Sequence in context: A041774 A043217 A039394 * A297585 A113599 A077757
KEYWORD
nonn,base
STATUS
approved