|
%I
%S 1,1,2,3,5,7,11,15,14,22,26,32,37,45,47,56,75,77,89,102,111,124,142,
%T 147,167,182,196,210,242,249,288,322,299,349,382,393,423,467,453,499,
%U 570,563,602,669,649,716,772,754,843,907,884
%N Number of 8-core partitions of n.
%H Alois P. Heinz, <a href="/A182803/b182803.txt">Table of n, a(n) for n = 0..10000</a>
%F G.f.: Product_{i>=1} (1-x^(8*i))^8/(1-x^i).
%F Euler transform of period 8 sequence [1,1,1,1,1,1,1,-7, .. ].
%p with (numtheory): A:= proc(n, t) option remember; local d, j; `if` (n=0, 1, add (add (`if` (t=0 or irem (d, t)=0, d-d*t, d), d=divisors(j)) *A(n-j, t), j=1..n) /n) end: seq (A(n,8), n=0..50);
%Y 8th column of A175595.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Dec 03 2010
|