OFFSET
1,2
EXAMPLE
For n = 12 we have n! = 479001600, m = 11 and n!/m = 43545600 = 5*5*6*7*8*8*8*9*9, so a(12) = 556788899.
PROG
(PARI) {for(n=1, 21, f=factor(n!); m=1; for(j=1, matsize(f)[1], if(f[j, 1]<=7, m=m*f[j, 1]^f[j, 2])); s=if(m>1, "", "1"); k=9; while(m>1, d=divrem(m, k); if(d[2]==0, s=concat(k, s); m=d[1], k--)); print1(eval(s), ", "))}
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Amarnath Murthy, Jan 07 2002
EXTENSIONS
Edited, corrected and extended by Klaus Brockhaus, Jun 17 2003
STATUS
approved