|
%I #5 Nov 21 2013 12:48:44
%S 1,5,176,56,4565,385,63261,1958,614154,8349,4697205,31185,30167357,
%T 105558,169229875,329931,851376628,966467,3913864295,2679689,
%U 16670689208,7089500,66493182097,18004327,250438925115,44108109,896684817527,104651419,3068829878530
%N Number of partitions of T where T=(7*n + 1) if n is even and T=((7*n + 1)/2) if n is odd.
%e If n=12 then P(7*n + 1) = 30167357.
%t Table[If[EvenQ[n],PartitionsP[7n+1],PartitionsP[(7n+1)/2]], {n,0,30}] (* _Harvey P. Dale_, Sep 30 2011 *)
%Y Cf. A111451, A111329.
%K nonn
%O 0,2
%A _Parthasarathy Nambi_, Nov 16 2005
%E More terms from Harvey P. Dale, Sep 30 2011
|
