[go: up one dir, main page]

login
A033068
Numbers with the property that all pairs of consecutive base-3 digits differ by 1.
3
1, 2, 3, 5, 7, 10, 16, 21, 23, 30, 32, 48, 50, 64, 70, 91, 97, 145, 151, 192, 194, 210, 212, 273, 275, 291, 293, 435, 437, 453, 455, 577, 583, 631, 637, 820, 826, 874, 880, 1306, 1312, 1360, 1366, 1731, 1733, 1749, 1751, 1893, 1895, 1911, 1913, 2460, 2462, 2478
OFFSET
1,2
LINKS
MATHEMATICA
Join[Range[2], Select[Range[2000], Union[Abs[Differences[IntegerDigits[#, 3]]]]=={1}&]] (* Harvey P. Dale, Dec 28 2011 *)
CROSSREFS
Cf. A007089.
Sequence in context: A286227 A134792 A300795 * A234368 A052011 A278706
KEYWORD
nonn,base
STATUS
approved