A043945 Numbers k such that 2 and 3 occur juxtaposed in the base-8 representation of k but not of k+1.

19, 26, 83, 90, 147, 159, 215, 218, 275, 282, 339, 346, 403, 410, 467, 474, 531, 538, 595, 602, 659, 671, 727, 730, 787, 794, 851, 858, 915, 922, 979, 986, 1043, 1050, 1107, 1114, 1171, 1183, 1279, 1299, 1306, 1363, 1370, 1427

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A007094.

Sequence in context: A181691 A039342 A043165 * A274685 A152013 A160036

Adjacent sequences: A043942 A043943 A043944 * A043946 A043947 A043948

Keyword

nonn,base

Author

Clark Kimberling

Status

approved