login
A044567
Numbers n such that string 6,6 occurs in the base 7 representation of n but not of n+1.
1
48, 97, 146, 195, 244, 293, 342, 391, 440, 489, 538, 587, 636, 685, 734, 783, 832, 881, 930, 979, 1028, 1077, 1126, 1175, 1224, 1273, 1322, 1371, 1420, 1469, 1518, 1567, 1616, 1665, 1714, 1763, 1812, 1861, 1910, 1959, 2008, 2057, 2106, 2155, 2204, 2253, 2302
OFFSET
1,1
LINKS
Tanya Khovanova, Non Recursions
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 7], {6, 6}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Harvey P. Dale, Aug 20 2021 *)
CROSSREFS
Cf. A157362, A010727 [From Vincenzo Librandi, Mar 12 2009]
Sequence in context: A043418 A031486 A044186 * A070258 A260248 A260001
KEYWORD
nonn,base
EXTENSIONS
Incorrect Mathematica program deleted by Harvey P. Dale, Aug 20 2021
STATUS
approved