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 A182074 #5 Apr 13 2012 11:21:38 %S A182074 12,16,24,56,40,48,56,64,148,80,72,96,120,96,104,304,120,128,168,144, %T A182074 184,176,120,208,524,160,184,256,232,192,264,224,264,304,184,760,344, %U A182074 176,280,400,328,256,344,352,392,416,200,384,1156,288,376,496 %N A182074 Number of ordered triples (w,x,y) with all terms in {-n,...,0,...,n} and w^2+x*y=n. %C A182074 For a guide to related sequences, see A211422. %t A182074 t[n_] := t[n] = Flatten[Table[w^2 + x*y - n, {w, -n, n}, {x, -n, n}, {y, -n, n}]] %t A182074 c[n_] := Count[t[n], 0] %t A182074 t = Table[c[n], {n, 1, 80}] (* A182074 *) %t A182074 t/4 (* A028387 *) %Y A182074 Cf. A211422. %K A182074 nonn %O A182074 1,1 %A A182074 _Clark Kimberling_, Apr 12 2012