|
|
A023743
|
|
Base 5 expansion uses each positive digit just once.
|
|
1
|
|
|
194, 198, 214, 222, 238, 242, 294, 298, 334, 346, 358, 366, 414, 422, 434, 446, 482, 486, 538, 542, 558, 566, 582, 586, 694, 698, 714, 722, 738, 742, 894, 898, 954, 970, 978, 990, 1014, 1022, 1054, 1070, 1102, 1110, 1138
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
194 in base 5 is 1234.
1138 in base 5 is 14023; 14510 in base 5 is 431020. - Harvey P. Dale, Jul 26 2018
|
|
MATHEMATICA
|
Union[ Map[ Plus@@(Array[ (5^#)&, Length[ # ], 0 ]*#)&, Flatten[ Table[ Permutations[ Join[ Range[ 5-1 ], Array[ 0&, k ] ] ], {k, 0, 1} ], 1 ] ] ]
Table[FromDigits[#, 5]&/@Permutations[PadRight[{1, 2, 3, 4}, n, 0]], {n, 4, 5}]//Flatten//Union (* Harvey P. Dale, Jul 26 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|