login
A033078
Numbers in which all pairs of consecutive base-7 digits differ by 3.
0
1, 2, 3, 4, 5, 6, 11, 19, 21, 27, 29, 37, 45, 78, 135, 150, 192, 207, 264, 315, 321, 550, 950, 1050, 1056, 1344, 1350, 1450, 1850, 2208, 2250, 3851, 6652, 7353, 7395, 9411, 9453, 10154, 12955, 15456, 15462, 15750, 15756, 26961, 46569, 51471, 51477, 51765, 51771
OFFSET
1,2
MATHEMATICA
Join[Range[6], Select[Range[27000], Union[Abs[Differences[IntegerDigits[#, 7]]]] =={3}&]] (* Harvey P. Dale, Apr 21 2011 *)
CROSSREFS
Sequence in context: A319722 A060733 A283563 * A118598 A264976 A243286
KEYWORD
nonn,base
STATUS
approved