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 A238517 #9 Mar 10 2014 04:15:37
%S A238517 1,1,1,2,2,5,6,11,14,26,34,52,79,110,162,231,328,446,660,872,1236,
%T A238517 1660,2327,3060,4238,5586,7595,9988,13376,17470,23318,30286,39744,
%U A238517 51676,67276,86929,112390,144472,185428,237826,303171,386468,490838,622882,786068,995118,1249838,1573522,1970542
%N A238517 Square row sums of the table A008289 (A060016).
%F A238517 a(n) = sum(q(n,k)^k,k=0..n), where q(n,k) is the number of partitions of n into k distinct parts (A008289, A060016).
%t A238517 qq[n_] := CoefficientList[Series[Sum[x^Binomial[k+1,2]y^k/Product[1-x^i,{i,1,k}],{k,0,n}],{x,0,n},{y,0,n}],{x,y}]
%t A238517 Total[Transpose[Map[#^2 &, qq[100]]]]
%Y A238517 Cf. A008289, A060016.
%K A238517 nonn
%O A238517 0,4
%A A238517 _Emanuele Munarini_, Feb 28 2014