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 A025322 #21 Feb 16 2025 08:32:35 %S A025322 27,33,38,41,51,57,59,62,69,74,75,77,83,90,94,98,102,105,107,108,113, %T A025322 117,118,121,122,123,125,132,137,138,139,141,147,152,154,155,158,164, %U A025322 165,170,177,178,181,187,195,197,203,204,210,211,213,214,217,218,226,228,229,236 %N A025322 Numbers that are the sum of 3 nonzero squares in exactly 2 ways. %H A025322 Robert Price, <a href="/A025322/b025322.txt">Table of n, a(n) for n = 1..418</a> %H A025322 <a href="/index/Su#ssq">Index entries for sequences related to sums of squares</a> %H A025322 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SquareNumber.html">Square Number.</a> %t A025322 okQ[n_]:=Length[Select[PowersRepresentations[n,3,2],!MemberQ[ #,0]&]] ==2; Select[Range[250],okQ] (* _Harvey P. Dale_, Jul 25 2011 *) %Y A025322 Cf. A024796, A025427, A025322, A025323, A025324, A025325, A025326, A025327, A025328, A025329, A025330, A025331, A025332, A025333, A025334, A025335, A025336, A025337, A025338. %K A025322 nonn %O A025322 1,1 %A A025322 _David W. Wilson_