A044295 Numbers n such that string 4,8 occurs in the base 9 representation of n but not of n-1.

44, 125, 206, 287, 368, 396, 449, 530, 611, 692, 773, 854, 935, 1016, 1097, 1125, 1178, 1259, 1340, 1421, 1502, 1583, 1664, 1745, 1826, 1854, 1907, 1988, 2069, 2150, 2231, 2312, 2393, 2474, 2555, 2583, 2636, 2717, 2798

Offset

1,1

Links

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

Mathematica

Select[Range[2900], MemberQ[Partition[IntegerDigits[#, 9], 2, 1], {4, 8}] && !MemberQ[Partition[IntegerDigits[#-1, 9], 2, 1], {4, 8}]&]  (* Harvey P. Dale, Apr 18 2011 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {4, 8}]>0, 1, 0], {n, 3000}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 30 2019 *)

Crossrefs

Sequence in context: A245616 A264446 A039441 * A044676 A253327 A253320

Adjacent sequences: A044292 A044293 A044294 * A044296 A044297 A044298

Keyword

nonn,base

Author

Clark Kimberling

Status

approved