A093881 Let n! = 2^a*3^b*5^c*7^d.... in canonical form, then a(n) = concatenation a,b,c,d,...

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

Offset

1,3

Comments

n! is the least number with this canonical form.

Links

Table of n, a(n) for n=1..27.

Mathematica

Do[Print[FromDigits[Last /@ FactorInteger[n! ]]], {n, 1, 30}] (* Ryan Propper, Jul 21 2005 *)

Crossrefs

Sequence in context: A098264 A023279 A068715 * A328715 A163763 A201808

Adjacent sequences: A093878 A093879 A093880 * A093882 A093883 A093884

Keyword

base,nonn

Author

Amarnath Murthy, Apr 22 2004

Extensions

More terms from Ryan Propper, Jul 21 2005

Status

approved