login
A181952
n!, digits ordered, zeros omitted.
1
1, 1, 2, 6, 24, 12, 27, 45, 234, 23688, 23688, 136899, 14679, 222678, 112277889, 133466778, 2227888899, 23455667889, 22334567778, 111223445688, 122234466789, 1112444577999, 11224667777778, 122344556667788889, 122333334444667899, 11112333445558899
OFFSET
0,3
LINKS
EXAMPLE
For n=1, n!=1 and a(n) = 1; when n=10, n!=3628800, a(n), with digits ordered & zeros omitted, = 23688.
MATHEMATICA
Table[FromDigits[Sort[IntegerDigits[n!]]], {n, 0, 30}] (* T. D. Noe, Apr 03 2012 *)
PROG
(Magma) A181952:=func<n | Seqint(Reverse(Sort(Intseq(Factorial(n)))))>; [A181952(n): n in [0..25]]; // Bruno Berselli, Apr 03 2012
CROSSREFS
Sequence in context: A324528 A334795 A370252 * A345902 A256270 A374265
KEYWORD
nonn,easy,base
AUTHOR
Dave Durgin, Apr 03 2012
STATUS
approved