%I #4 Mar 30 2012 16:48:57
%S 1,1,2,3,5,7,15,176,476715857290
%N a(n) = p(n) if n <= 4 else p(a(n-1)), where p = partition numbers A000041.
%p A058702 := proc(n) option remember; if n<=4 then A000041(n) else A000041(A058702(n-1)); fi; end;
%K nonn
%O 0,3
%A _N. J. A. Sloane_, Dec 31 2000
%E The next term is too large to include.
|