A044617 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A044617

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

49, 113, 177, 241, 305, 369, 399, 433, 497, 561, 625, 689, 753, 817, 881, 911, 945, 1009, 1073, 1137, 1201, 1265, 1329, 1393, 1423, 1457, 1521, 1585, 1649, 1713, 1777, 1841, 1905, 1935, 1969, 2033, 2097, 2161, 2225, 2289, 2353

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

Select[Range[2500], MemberQ[Partition[IntegerDigits[#, 8], 2, 1], {6, 1}] && !MemberQ[Partition[ IntegerDigits[#+1, 8], 2, 1], {6, 1}]&] (* Harvey P. Dale, Jul 28 2012 *)

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {6, 1}]>0, 1, 0], {n, 2500}], {1, 0}][[;; , 1]] (* Harvey P. Dale, Aug 17 2023 *)

CROSSREFS

Sequence in context: A088868 A373734 A044236 * A216169 A348054 A090095

Adjacent sequences: A044614 A044615 A044616 * A044618 A044619 A044620

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

STATUS

approved