cp's OEIS Frontend

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.

A182074 Number of ordered triples (w,x,y) with all terms in {-n,...,0,...,n} and w^2+x*y=n.

This page as a plain text file.
%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