A044619 Numbers n such that string 6,3 occurs in the base 8 representation of n but not of n+1.

51, 115, 179, 243, 307, 371, 415, 435, 499, 563, 627, 691, 755, 819, 883, 927, 947, 1011, 1075, 1139, 1203, 1267, 1331, 1395, 1439, 1459, 1523, 1587, 1651, 1715, 1779, 1843, 1907, 1951, 1971, 2035, 2099, 2163, 2227, 2291, 2355

Offset

1,1

Links

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

Mathematica

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {6, 3}]>0, 1, 0], {n, 2500}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, Jun 06 2016 *)

Crossrefs

Sequence in context: A015705 A359088 A044238 * A031894 A068564 A063314

Adjacent sequences: A044616 A044617 A044618 * A044620 A044621 A044622

Keyword

nonn,base

Author

Clark Kimberling

Status

approved