cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A225549 a(n) is the number of terms in the expansion of (x-y)*(x^4-y^4)*(x^9-y^9)*...*(x^(n^2)-y^(n^2)).

This page as a plain text file.
%I A225549 #13 May 13 2013 01:20:37
%S A225549 2,4,8,16,24,40,68,103,162,236,344,453,612,790,994,1229,1432,1782,
%T A225549 2134,2517,2968,3460,3974,4543,5160,5822,6546,7347,8184,9080,10058,
%U A225549 11075,12166,13316,14536,15837,17202,18654,20156,21765,23450,25212,27074,29001,31032,33158,35370,37679,40070,42578
%N A225549 a(n) is the number of terms in the expansion of (x-y)*(x^4-y^4)*(x^9-y^9)*...*(x^(n^2)-y^(n^2)).
%C A225549 In the definition one can take y=1. Thus the sequence becomes the number of terms in the polynomial of the product{k=1..n} (1-x^(k^2)).
%t A225549 a[n_] := Length@ ExpandAll@ Product[(1 - x^(k^2)), {k, n}]; Array[f, 40]
%o A225549 (PARI) a(n)=my(P=prod(k=1,n,1-'x^k^2)); sum(i=0, poldegree(P), polcoeff(P,i)!=0) \\ _Charles R Greathouse IV_, May 10 2013
%Y A225549 Cf. A000124, A086781, A086795, A086796, A086817.
%K A225549 nonn
%O A225549 1,1
%A A225549 Yuval Dekel (dekelyuval(AT)hotmail.com) and _Robert G. Wilson v_, May 10 2013