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 A138780 #4 Aug 22 2015 17:35:36 %S A138780 1,6,21,56,126,252,2,462,18,792,90,1287,330,2002,990,3003,2574,3,4368, %T A138780 6006,36,6188,12870,234,8568,25740,1092,11628,48620,4095,15504,87516, %U A138780 13104,4,20349,151164,37128,60 %N A138780 Triangle read by rows: T(n,k)=k*binomial(n-2k,3k+2) (n>=7, 1<=k<=(n-2)/5). %C A138780 Row n contains floor((n-2)/5) terms. %C A138780 Row sums yield A137361. %D A138780 D. E. Knuth, The Art of Computer Programming, Vol. 4A, Section 7.1.4. %p A138780 T:=proc(n,k) options operator, arrow: k*binomial(n-2*k, 3*k+2) end proc: for n from 7 to 23 do seq(T(n,k),k=1..(n-2)*1/5) end do; # yields sequence in triangular form %t A138780 Flatten[Table[k*Binomial[n-2k,3k+2],{n,7,30},{k,1,(n-2)/5}]] (* _Harvey P. Dale_, Aug 22 2015 *) %Y A138780 Cf. A137361. %K A138780 nonn,tabf %O A138780 7,2 %A A138780 _Emeric Deutsch_, May 10 2008