A106410 Length of side opposite the lesser of the two angles, one being the double of the other, of a primitive integer-sided triangle, sorted on perimeter(A106499).

4, 9, 9, 16, 25, 16, 25, 36, 25, 49, 25, 49, 64, 49, 36, 81, 49, 64, 81, 49, 100, 49, 64, 121, 81, 100, 121, 81, 144, 64, 121, 169, 121, 81, 169, 121, 196, 81, 100, 169, 121, 144, 225, 169, 121, 196, 225, 100, 169, 256, 121, 144, 169, 121, 196, 289, 225, 169, 256, 121

Offset

1,1

Links

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

Formula

a(n) = A106500(n)^2.

Mathematica

sol[p_] := Solve[1 < r < s < 2 r && p == r s + s^2 && GCD[r, s] == 1, {r, s}, Integers];
Reap[For[p = 1, p <= 1000, p++, sp = sol[p]; If[sp =!= {}, Print[r^2 /. sp[[1]]]; Sow[r^2 /. sp[[1]]]]]][[2, 1]] (* Jean-François Alcover, Mar 07 2020 *)

Crossrefs

Cf. A106499-A106506, A106420, A106430.

Sequence in context: A250126 A186887 A140978 * A065737 A014719 A139417

Adjacent sequences: A106407 A106408 A106409 * A106411 A106412 A106413

Keyword

nonn

Author

Lekraj Beedassy and Ray Chandler, May 09 2005

Status

approved