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 A181786 #29 Nov 28 2022 01:50:57
%S A181786 0,0,0,1,0,0,1,1,0,3,0,2,1,1,1,3,0,2,3,3,0,6,2,3,1,2,1,8,1,3,3,4,0,10,
%T A181786 2,5,3,4,3,8,0,5,6,6,2,11,3,6,1,8,2,12,1,6,8,8,1,15,3,8,3,7,4,20,0,6,
%U A181786 10,9,2,16,5,9,3,9,4,15,3,15,8,10,0,22,5,11,6,9,6,18,2,11,11,14,3,21,6,13,1,12,8,31,2
%N A181786 Number of inequivalent solutions to n^2 = a^2 + b^2 + c^2 with positive a, b, c.
%C A181786 Note that a(n)=0 for n=0 and the n in A094958.
%C A181786 Also note that a(2n)=a(n), e.g., a(1000)=a(500)=a(250)=a(125)=14. - _Zak Seidov_, Mar 02 2012
%C A181786 a(n) is the number of distinct parallelepipeds each one having integer diagonal n and integer sides. - _César Eliud Lozada_, Oct 26 2014
%H A181786 Samuel Harkness, <a href="/A181786/b181786.txt">Table of n, a(n) for n = 0..10000</a> (terms 0..1000 from Zak Seidov)
%t A181786 nn=100; t=Table[0,{nn}]; Do[n=Sqrt[a^2+b^2+c^2]; If[n<=nn && IntegerQ[n], t[[n]]++], {a,nn}, {b,a,nn}, {c,b,nn}]; Prepend[t,0]
%Y A181786 Cf. A016725, A016727, A046080, A181787, A181788
%K A181786 nonn
%O A181786 0,10
%A A181786 _T. D. Noe_, Nov 12 2010