login
A044730
Numbers n such that string 1,7 occurs in the base 10 representation of n but not of n+1.
0
17, 117, 179, 217, 317, 417, 517, 617, 717, 817, 917, 1017, 1117, 1179, 1217, 1317, 1417, 1517, 1617, 1799, 1817, 1917, 2017, 2117, 2179, 2217, 2317, 2417, 2517, 2617, 2717, 2817, 2917, 3017, 3117, 3179, 3217, 3317, 3417
OFFSET
1,1
MATHEMATICA
Select[Range[3500], MemberQ[Partition[IntegerDigits[#], 2, 1], {1, 7}] && !MemberQ[Partition[IntegerDigits[#+1], 2, 1], {1, 7}]&] (* Harvey P. Dale, Nov 11 2011 *)
CROSSREFS
Sequence in context: A032692 A293877 A044349 * A086020 A056117 A196575
KEYWORD
nonn,base
STATUS
approved