login
A044354
Numbers n such that string 2,2 occurs in the base 10 representation of n but not of n-1.
0
22, 122, 220, 322, 422, 522, 622, 722, 822, 922, 1022, 1122, 1220, 1322, 1422, 1522, 1622, 1722, 1822, 1922, 2022, 2122, 2200, 2322, 2422, 2522, 2622, 2722, 2822, 2922, 3022, 3122, 3220, 3322, 3422, 3522, 3622, 3722, 3822
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {2, 2}]>0, 1, 0], {n, 4000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Feb 16 2020 *)
CROSSREFS
Sequence in context: A108571 A247700 A105776 * A140057 A044735 A247701
KEYWORD
nonn,base
STATUS
approved