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.
%I A086796 #5 Sep 04 2018 20:00:40 %S A086796 3,9,24,60,130,247,429,697,1075,1590,2272,3154,4272,5665,7375,9447, %T A086796 11929,14872,18330,22360,27022,32379,38497,45445,53295,62122,72004, %U A086796 83022,95260,108805,123747,140179 %N A086796 a(n) is the number of terms in the expansion of (x+y+z)*(x^2+y^2+z^2)*(x^3+y^3+z^3)*...*(x^n+y^n+z^n). %p A086796 A086796 := proc(n) %p A086796 mul( x^i+y^i+z^i,i=1..n) ; %p A086796 expand(%) ; %p A086796 nops([coeffs(%)]) ; %p A086796 end proc: # _R. J. Mathar_, Sep 15 2012 %t A086796 Table[Length[Expand[Times@@Table[Total[{x,y,z}^n],{n,m}]]],{m,40}] (* _Harvey P. Dale_, Sep 04 2018 *) %Y A086796 Cf. A000124. %K A086796 nonn %O A086796 1,1 %A A086796 Yuval Dekel (dekelyuval(AT)hotmail.com), Aug 05 2003