A044726 Numbers n such that string 1,3 occurs in the base 10 representation of n but not of n+1.

13, 113, 139, 213, 313, 413, 513, 613, 713, 813, 913, 1013, 1113, 1139, 1213, 1399, 1413, 1513, 1613, 1713, 1813, 1913, 2013, 2113, 2139, 2213, 2313, 2413, 2513, 2613, 2713, 2813, 2913, 3013, 3113, 3139, 3213, 3313, 3413

Offset

1,1

Links

Table of n, a(n) for n=1..39.

Mathematica

Flatten[Position[Partition[Table[If[MemberQ[Partition[IntegerDigits[n], 2, 1], {1, 3}], 1, 0], {n, 4000}], 2, 1], _?(#=={1, 0}&)]] (* Harvey P. Dale, Dec 24 2013 *)

Crossrefs

Sequence in context: A293873 A044345 A166573 * A303038 A141937 A320464

Adjacent sequences: A044723 A044724 A044725 * A044727 A044728 A044729

Keyword

nonn,base

Author

Clark Kimberling

Status

approved