login
A044565
Numbers n such that string 6,4 occurs in the base 7 representation of n but not of n+1.
0
46, 95, 144, 193, 242, 291, 328, 340, 389, 438, 487, 536, 585, 634, 671, 683, 732, 781, 830, 879, 928, 977, 1014, 1026, 1075, 1124, 1173, 1222, 1271, 1320, 1357, 1369, 1418, 1467, 1516, 1565, 1614, 1663, 1700, 1712, 1761, 1810
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 7], {6, 4}]>0, 1, 0], {n, 2000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 10 2019 *)
CROSSREFS
Sequence in context: A004923 A260568 A044184 * A252695 A252688 A358897
KEYWORD
nonn,base
STATUS
approved