login
A023793
Katadromes: digits in base 12 are in strict descending order.
1
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 24, 25, 36, 37, 38, 48, 49, 50, 51, 60, 61, 62, 63, 64, 72, 73, 74, 75, 76, 77, 84, 85, 86, 87, 88, 89, 90, 96, 97, 98, 99, 100, 101, 102, 103, 108, 109, 110, 111, 112, 113, 114, 115, 116, 120, 121, 122, 123, 124, 125
OFFSET
1,3
LINKS
MATHEMATICA
Select[Range[0, 150], AllTrue[Differences[IntegerDigits[#, 12]], #<0&]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 18 2020 *)
CROSSREFS
Sequence in context: A032981 A136332 A023766 * A032947 A257738 A039210
KEYWORD
nonn,base,fini,full,easy
STATUS
approved