login
A032968
Numbers with the property that all pairs of consecutive base-5 digits differ by more than 1.
1
1, 2, 3, 4, 8, 9, 10, 14, 15, 16, 20, 21, 22, 40, 41, 45, 46, 47, 52, 53, 54, 70, 71, 72, 77, 78, 79, 83, 84, 102, 103, 104, 108, 109, 110, 114, 202, 203, 204, 208, 209, 227, 228, 229, 233, 234, 235, 239, 260, 264, 265, 266, 270, 271, 272, 352, 353, 354, 358, 359, 360
OFFSET
1,2
MATHEMATICA
A032968Q[k_] := Min[Abs[Differences[IntegerDigits[k, 5]]]] > 1;
Select[Range[500], A032968Q] (* Paolo Xausa, Sep 28 2025 *)
CROSSREFS
Cf. A007091.
Sequence in context: A184810 A246293 A047228 * A381434 A079279 A364381
KEYWORD
nonn,base
EXTENSIONS
More terms from Paolo Xausa, Sep 28 2025
STATUS
approved