|
|
A093881
|
|
Let n! = 2^a*3^b*5^c*7^d.... in canonical form, then a(n) = concatenation a,b,c,d,...
|
|
0
|
|
|
0, 1, 11, 31, 311, 421, 4211, 7211, 7411, 8421, 84211, 105211, 1052111, 1152211, 1163211, 1563211, 15632111, 16832111, 168321111, 188421111, 189431111, 199432111, 1994321111, 2304321111, 2306321111, 2406322111, 2436322111
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
n! is the least number with this canonical form.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[Print[FromDigits[Last /@ FactorInteger[n! ]]], {n, 1, 30}] (* Ryan Propper, Jul 21 2005 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|