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 A238313 #10 Feb 27 2014 03:26:13
%S A238313 1,1,0,1,3,1,3,3,10,18,12,26,39,57,59,116,201,219,325,416,625,810,
%T A238313 1074,1447,2345,3078,3530,5084,6790,9063,11674,15580,20887,27537,
%U A238313 33640,45065,61297,76883,96889,126243,169268,210005,262068,337445,438197,552346,686794,865904,1128611,1407533,1732572
%N A238313 Alternating square row sums of the table A072233 (A008284).
%H A238313 Vincenzo Librandi, <a href="/A238313/b238313.txt">Table of n, a(n) for n = 0..90</a>
%F A238313 a(n) = sum((-1)^(n-k)*p(n,k)^2,k=0..n), where p(n,k) is the number of partitions of n into k positive parts (A072233, A008284).
%t A238313 pnkList[n_] := Table[Length[IntegerPartitions[n, {k}]], {k,0,n}]
%t A238313 Table[Total[Table[(-1)^(n-k),{k,0,n}] Map[#^2 &, pnkList[n]]], {n,0,50}]
%Y A238313 Cf. A072233, A008284.
%K A238313 nonn
%O A238313 0,5
%A A238313 _Emanuele Munarini_, Feb 24 2014