A068038 Number of subsets of {1,2,3,...,n} that sum to 0 mod 17.

1, 1, 1, 1, 1, 1, 3, 8, 15, 30, 60, 120, 241, 482, 964, 1928, 3856, 7712, 15422, 30842, 61682, 123362, 246722, 493446, 986896, 1973790, 3947580, 7895160, 15790320, 31580642, 63161284, 126322568, 252645136, 505290272, 1010580544, 2021161084

Offset: 0

Author

Antti Karttunen, Feb 11 2002

Keywords

• nonn

Crossrefs

17th row of A068009.

Programs

PARI

{A068038(n)=local(v,v1);v=vector(17);v[1]=1;for(i=1,n,v1=vector(17);for(j=0,16,v1[j+1]=v[j+1]+v[(j-i)%17+1]);v=v1);v[1]} \\ Max Alekseyev, Jul 23 2005

Formula

Empirical G.f.: -(2*x^17-x^12+x^8-2*x^7-x^6+x^5+x^4+x^3+x^2+x-1) / ((2*x-1)*(2*x^17-1)). - Colin Barker, Dec 22 2012

Extensions

Rechecked by Max Alekseyev, Jul 23 2005