A343893 - OEIS

%I #11 Apr 03 2023 14:36:11

%S 6,15,20,35,28,42,45,63,88,77,66,72,117,99,104,91,130,110,165,120,143,

%T 204,187,170,156,153,221,247,195,228,266,209,190,238,210,273,285,231,

%U 255,368,336,345,304,322,391,272,299,276,425,357,450,323,400,414,513,350,325,342,475,459

%N Side c of integer-sided primitive triangles (a, b, c) where side a is the harmonic mean of the 2 other sides b and c, i.e., 2/a = 1/b + 1/c with b < a < c.

%C The triples (a, b, c) are displayed in increasing order of side a, and if sides a coincide then in increasing order of the side b.

%C The sequence is not increasing because a(4) = 35 > a(5) =  28, but, these sides c are listed in increasing order in A020886.

%C For the corresponding primitive triples and miscellaneous properties and references, see A343891.

%F a(n) = A343891(n, 3).

%e a(3) = 20, because the third triple is (15, 12, 20) with side c = 20, satisfying 1/20 = 2/15 - 1/12 and 15-12 < 20 < 15+12.

%p for a from 4 to 200 do

%p for b from floor(a/2)+1 to a-1 do

%p c := a*b/(2*b-a);

%p if c=floor(c) and igcd(a,b,c)=1 and c-b<a then print(c); end if;

%p end do;

%p end do;

%Y Cf. A343891 (triples), A020883 (side a), A343892 (side b), A343894 (perimeter).

%Y Cf. A020886 (sides c ordered).

%K nonn

%O 1,1

%A _Bernard Schott_, May 06 2021