[go: up one dir, main page]

login
A033070
Numbers with the property that all pairs of consecutive base-5 digits differ by 1.
0
1, 2, 3, 4, 5, 7, 11, 13, 17, 19, 23, 26, 36, 38, 55, 57, 67, 69, 86, 88, 98, 117, 119, 130, 132, 180, 182, 192, 194, 276, 286, 288, 336, 338, 348, 430, 432, 442, 444, 492, 494, 586, 588, 598, 651, 661, 663, 901, 911, 913, 961, 963
OFFSET
1,2
MATHEMATICA
Join[Range[4], Select[Range[1000], Union[Abs[Differences[IntegerDigits[ #, 5]]]]=={1}&]] (* Harvey P. Dale, Dec 28 2011 *)
CROSSREFS
Sequence in context: A285304 A036844 A284696 * A211781 A348283 A046022
KEYWORD
nonn,base
STATUS
approved