A043154 Numbers k such that 0 and 3 occur juxtaposed in the base-8 representation of k but not of k-1.

24, 67, 88, 131, 152, 192, 216, 259, 280, 323, 344, 387, 408, 451, 472, 515, 536, 579, 600, 643, 664, 704, 728, 771, 792, 835, 856, 899, 920, 963, 984, 1027, 1048, 1091, 1112, 1155, 1176, 1216, 1240, 1283, 1304, 1347, 1368

Offset

1,1

Links

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

Mathematica

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {0, 3}]>0 || SequenceCount[IntegerDigits[n, 8], {3, 0}]>0, 1, 0], {n, 1400}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 24 2017 *)

Crossrefs

Cf. A007094.

Sequence in context: A175153 A250799 A250791 * A039331 A043934 A087406

Adjacent sequences: A043151 A043152 A043153 * A043155 A043156 A043157

Keyword

nonn,base

Author

Clark Kimberling

Status

approved