login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A025342 Numbers that are the sum of 3 distinct nonzero squares in exactly 4 ways. 1
161, 189, 194, 209, 234, 254, 261, 270, 281, 285, 290, 293, 299, 321, 362, 365, 369, 371, 378, 386, 390, 395, 401, 405, 406, 419, 429, 449, 450, 465, 469, 477, 482, 485, 489, 491, 501, 510, 518, 534, 539, 557, 563, 570, 573, 574, 586, 589, 601, 609, 633, 644, 645, 649 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
MAPLE
N:= 10^6;
A:= Vector(N):
for a from 1 to floor(sqrt(N/3)) do
for b from a+1 to floor(sqrt((N-a^2)/2)) do
c:= [$(b+1) .. floor(sqrt(N-a^2-b^2))]:
v:= map(t -> a^2 + b^2 + t^2, c):
A[v]:= map(`+`, A[v], 1)
od od:
select(t -> A[t]=4, [$1..N]); # Robert Israel, Jan 03 2016
MATHEMATICA
Sort[Transpose[Select[Tally[Total/@Subsets[Range[30]^2, {3}]], #[[2]]==4&]][[1]]] (* Harvey P. Dale, Apr 24 2013 *)
CROSSREFS
Sequence in context: A278896 A249397 A025350 * A189639 A348426 A298615
KEYWORD
nonn
AUTHOR
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 19 07:31 EDT 2024. Contains 370955 sequences. (Running on oeis4.)