A044583 Numbers n such that string 1,7 occurs in the base 8 representation of n but not of n+1.

15, 79, 127, 143, 207, 271, 335, 399, 463, 527, 591, 639, 655, 719, 783, 847, 911, 1023, 1039, 1103, 1151, 1167, 1231, 1295, 1359, 1423, 1487, 1551, 1615, 1663, 1679, 1743, 1807, 1871, 1935, 1999, 2063, 2127, 2175, 2191, 2255

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {1, 7}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 30 2020 *)

Crossrefs

Sequence in context: A269620 A269436 A044202 * A212746 A212741 A082540

Adjacent sequences: A044580 A044581 A044582 * A044584 A044585 A044586

Keyword

nonn,base

Author

Clark Kimberling

Status

approved