A023801 Xenodromes: numbers such that all digits in base 6 are different.
0, 1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23, 24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 38, 39, 40, 41, 48, 51, 52, 53, 54, 56, 58, 59, 60, 62, 63, 65, 66, 68, 69, 70, 73, 75, 76, 77, 78, 81, 82, 83, 90, 91, 94, 95, 96, 97, 99, 101, 102
Offset: 1
Links
- Nathaniel Johnston, Table of n, a(n) for n = 1..1631 (full sequence)
Programs
-
Mathematica
Select[Range[0, 150], Max[DigitCount[#, 6]] == 1 &] (* Paolo Xausa, Mar 22 2025 *)