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 A246231 #10 Feb 11 2015 04:10:26 %S A246231 12600,78120,189000,549000,1389960,2858640,6471699,15289662,29639082, %T A246231 64025820,134997382,267550925,545274648,1161661901,2223888268, %U A246231 4552401195,9185643748,17829746962,35102264675,71613947350,135793314152,270167493481,534784841445 %N A246231 Number of compositions of n into exactly four different parts with distinct multiplicities. %H A246231 Alois P. Heinz and Vaclav Kotesovec, <a href="/A246231/b246231.txt">Table of n, a(n) for n = 20..220</a> (first 120 terms from Alois P. Heinz) %t A246231 b[n_, i_, s_List] := b[n, i, s] = If[n == 0, Total[s]!, If[i<1, 0, Expand[ Sum[ If[j>0 && MemberQ[s, j], 0, If[j == 0, 1, x]*b[n-i*j, i-1, If[j == 0, s, s ~Union~ {j}]]/j!], {j, 0, n/i}]]]]; a[n_] := Coefficient[b[n, n, {}], x, 4]; Table[a[n], {n, 20, 50}] (* _Jean-François Alcover_, Feb 11 2015, after _Alois P. Heinz_ *) %Y A246231 Column k=4 of A242896. %K A246231 nonn %O A246231 20,1 %A A246231 _Alois P. Heinz_, Aug 19 2014