login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A084646 Hypotenuses for which there exist 2 distinct integer triangles. 17
25, 50, 75, 100, 150, 169, 175, 200, 225, 275, 289, 300, 338, 350, 400, 450, 475, 507, 525, 550, 575, 578, 600, 675, 676, 700, 775, 800, 825, 841, 867, 900, 950, 1014, 1050, 1075, 1100, 1150, 1156, 1175, 1183, 1200, 1225, 1350, 1352, 1369, 1400 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Numbers whose square is decomposable in 2 different ways into the sum of two nonzero squares: these are those with exactly one prime divisor of the form 4k+1 with multiplicity two. - Jean-Christophe Hervé, Nov 11 2013

LINKS

Table of n, a(n) for n=1..47.

Eric Weisstein's World of Mathematics, Pythagorean Triple

FORMULA

Terms are obtained by the products A004144(k)*A002144(p)^2 for k, p > 0, ordered by increasing values. - Jean-Christophe Hervé, Nov 12 2013

A046080(a(n)) = 2, A046109(a(n)) = 20. - Jean-Christophe Hervé, Dec 01 2013

MATHEMATICA

Clear[lst, f, n, i, k] f[n_]:=Module[{i=0, k=0}, Do[If[Sqrt[n^2-i^2]==IntegerPart[Sqrt[n^2-i^2]], k++ ], {i, n-1, 1, -1}]; k/2]; lst={}; Do[If[f[n]==2, AppendTo[lst, n]], {n, 4*5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 12 2009 *)

CROSSREFS

Cf. A002144, A004144, A006339, A046080, A046109.

Cf. A083025, A084645, A084647, A084648, A084649.

Sequence in context: A043350 A023723 A044458 * A031472 A045210 A169860

Adjacent sequences:  A084643 A084644 A084645 * A084647 A084648 A084649

KEYWORD

nonn

AUTHOR

Eric W. Weisstein, Jun 01 2003

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy .

Last modified April 28 23:30 EDT 2017. Contains 285604 sequences.