OFFSET
1,10
LINKS
Stefano Spezia, Table of n, a(n) for n = 1..10000
FORMULA
a(10^n) = 10^n.
a((10^n-1)/9) = ((10^n-1)/9)^n.
EXAMPLE
a(12) = C(12,1)*C(12,2) = 12*66 = 792.
a(111) = 111^3.
MAPLE
a:=proc(n) local aa: aa:=convert(n, base, 10): mul(binomial(n, aa[j]), j=1..nops(aa)) end: seq(a(n), n=1..40); # Emeric Deutsch, Aug 27 2005
MATHEMATICA
a[n_]:=Product[Binomial[n, Part[IntegerDigits[n], i]], {i, IntegerLength[n]}]; Array[a, 34] (* Stefano Spezia, Sep 07 2024 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Aug 17 2005
EXTENSIONS
More terms from Emeric Deutsch, Aug 27 2005
STATUS
approved