A044602 Numbers n such that string 4,2 occurs in the base 8 representation of n but not of n+1.

34, 98, 162, 226, 279, 290, 354, 418, 482, 546, 610, 674, 738, 791, 802, 866, 930, 994, 1058, 1122, 1186, 1250, 1303, 1314, 1378, 1442, 1506, 1570, 1634, 1698, 1762, 1815, 1826, 1890, 1954, 2018, 2082, 2146, 2239, 2274, 2327

Offset

1,1

Links

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

Mathematica

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {4, 2}]>0, 1, 0], {n, 2500}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, May 28 2015 *)

Crossrefs

Sequence in context: A233031 A233028 A044221 * A159904 A282854 A165222

Adjacent sequences: A044599 A044600 A044601 * A044603 A044604 A044605

Keyword

nonn,base

Author

Clark Kimberling

Status

approved