login
A032989
If d,e are consecutive digits of n in base 7, then |d-e|>=4.
0
1, 2, 3, 4, 5, 6, 12, 13, 20, 28, 35, 36, 42, 43, 44, 84, 85, 91, 92, 93, 140, 141, 142, 200, 201, 202, 249, 250, 251, 257, 258, 298, 299, 300, 306, 307, 314, 592, 593, 594, 600, 601, 641, 642, 643, 649, 650, 657, 984, 985, 986, 992
OFFSET
1,2
MATHEMATICA
Select[Range[1000], Min[Abs[Differences[IntegerDigits[#, 7]]]]>3&] (* Harvey P. Dale, Sep 06 2023 *)
CROSSREFS
Sequence in context: A032861 A032885 A023788 * A367147 A322570 A108320
KEYWORD
nonn,base
STATUS
approved