|
| |
|
|
A108707
|
|
Minimum side in Pythagorean triangles with hypotenuse of n.
|
|
1
| |
|
|
0, 0, 0, 0, 3, 0, 0, 0, 0, 6, 0, 0, 5, 0, 9, 0, 8, 0, 0, 12, 0, 0, 0, 0, 7, 10, 0, 0, 20, 18, 0, 0, 0, 16, 21, 0, 12, 0, 15, 24, 9, 0, 0, 0, 27, 0, 0, 0, 0, 14, 24, 20, 28, 0, 33, 0, 0, 40, 0, 36, 11, 0, 0, 0, 16, 0, 0, 32, 0, 42, 0, 0, 48, 24, 21, 0, 0, 30, 0, 48, 0, 18, 0, 0, 13, 0, 60, 0, 39, 54
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,5
|
|
|
MATHEMATICA
| f[n_]:=Block[{k=n-1, m=Sqrt[n/2], a}, While[k>m&&!IntegerQ[(a=Sqrt[n^2-k^2])], k--]; If[k<=m, 0, a]]; Table[f[n], {n, 90}]
|
|
|
CROSSREFS
| Cf. A083025, A046083, A046084, A009000, A009003, A108708.
A046080 gives the number of Pythagorean triangles with hypotenuse n.
Sequence in context: A035656 A130460 A097017 * A046775 A204060 A085393
Adjacent sequences: A108704 A108705 A108706 * A108708 A108709 A108710
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Sebastien Dumortier (sdumortier(AT)ac-limoges.fr), Jun 20 2005
|
|
|
EXTENSIONS
| Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Dec 20 2011
|
| |
|
|
