|
%I #7 Sep 28 2017 04:31:36
%S 1,10,145,2120,29660,406752,5475160,72591320,950032770,12294612660,
%T 157545928646,2001232474600,25222164942650,315640538122100,
%U 3924720693484450,48514280936275240,596460638741281825,7296675024124004450,88849865885787401525,1077249149081661058800
%N Number of sets of nonempty words with a total of n letters over 10-ary alphabet.
%H Alois P. Heinz, <a href="/A292844/b292844.txt">Table of n, a(n) for n = 0..975</a>
%F G.f.: Product_{j>=1} (1+x^j)^(10^j).
%F a(n) ~ 10^n * exp(2*sqrt(n) - 1/2 - c) / (2 * sqrt(Pi) * n^(3/4)), where c = Sum_{m>=2} (-1)^m/(m*(10^(m-1)-1)) = 0.05242033574521236673164923513877706425... - _Vaclav Kotesovec_, Sep 28 2017
%p h:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0,
%p add(h(n-i*j, i-1)*binomial(10^i, j), j=0..n/i)))
%p end:
%p a:= n-> h(n$2):
%p seq(a(n), n=0..30);
%Y Column k=10 of A292804.
%K nonn
%O 0,2
%A _Alois P. Heinz_, Sep 24 2017
|
