A044558 Numbers n such that string 5,4 occurs in the base 7 representation of n but not of n+1.

39, 88, 137, 186, 235, 279, 284, 333, 382, 431, 480, 529, 578, 622, 627, 676, 725, 774, 823, 872, 921, 965, 970, 1019, 1068, 1117, 1166, 1215, 1264, 1308, 1313, 1362, 1411, 1460, 1509, 1558, 1607, 1651, 1656, 1705, 1754, 1803

Offset

1,1

Links

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

Mathematica

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 7], {5, 4}]>0, 1, 0], {n, 2000}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, Jun 05 2016 *)

Crossrefs

Sequence in context: A063335 A020264 A044177 * A242181 A020168 A063318

Adjacent sequences: A044555 A044556 A044557 * A044559 A044560 A044561

Keyword

nonn,base

Author

Clark Kimberling

Status

approved