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

68, 132, 196, 260, 324, 388, 452, 516, 551, 580, 644, 708, 772, 836, 900, 964, 1028, 1063, 1092, 1156, 1220, 1284, 1348, 1412, 1476, 1540, 1575, 1604, 1668, 1732, 1796, 1860, 1924, 1988, 2052, 2087, 2116, 2180, 2244, 2308

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {0, 4}]>0, 1, 0], {n, 2400}], {1, 0}]][[1]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10.1 *) (* Harvey P. Dale, Apr 05 2015 *)

Crossrefs

Sequence in context: A352298 A364692 A044191 * A153677 A234876 A044319

Adjacent sequences: A044569 A044570 A044571 * A044573 A044574 A044575

Keyword

nonn,base

Author

Clark Kimberling

Status

approved