A127007 a(n) = number of n-digit terms in A108571.

1, 1, 4, 5, 16, 82, 169, 541, 2272, 17965, 44407, 201751, 801515, 4890886, 52218595, 165519640, 835947970, 4290442728, 24096524166, 179566203960, 2739764737710, 9938147178960, 60997160143920, 331360222255920, 2154105076695000

Offset

1,3

Comments

First 9 terms coincide with terms in A007837. Sum of all 45 terms gives the total number of terms in A108571: 66712890763701234740813164553708284.

Links

Zak Seidov, Table of n, a(n) for n = 1..45.

Mathematica

a[n_, w_:{0}] := If[n == 0, Total[w]!/Times @@ (w!), Sum[a[n-k, Append[w, k]], {k, 1 + Last@w, Min[9, n]}]]; Array[a, 45] (* Giovanni Resta, May 19 2013 *)

Crossrefs

Cf. A007837, A108571.

Sequence in context: A057729 A110278 A013628 * A007837 A032219 A372802

Adjacent sequences: A127004 A127005 A127006 * A127008 A127009 A127010

Keyword

base,nonn

Author

Zak Seidov, Jan 02 2007

Status

approved