A181952 n!, digits ordered, zeros omitted.

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

Vincenzo Librandi, Table of n, a(n) for n = 0..200

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 A243657

Adjacent sequences: A181949 A181950 A181951 * A181953 A181954 A181955

Keyword

nonn,easy,base

Author

Dave Durgin, Apr 03 2012

Status

approved