A179271 Odd long legs `B` of more than one primitive Pythagorean triangle.

2145, 3315, 3465, 4095, 4845, 5005, 5865, 6435, 6545, 6555, 7735, 8645, 9009, 9945, 10005, 10695, 11305, 11781, 13167, 13485, 13685, 13923, 14535, 15015, 15295, 15561, 16065, 16095, 17017, 17205, 17255, 17835, 17955, 18837, 19019, 19065

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 06 2010

Keywords

• nonn

Comments

2145,752,2273;2145,1568,2657;;3315,812,3413;3315,2852,4373;

Links

• Ray Chandler, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A024407, A024408, A024409, A024410, A024411, A161962, A174830

Programs

Mathematica

lst1={};lst={0};Do[Do[If[GCD[a,b]==1,c=Sqrt[a^2+b^2];If[IntegerQ[c],AppendTo[lst,b];L=Length[lst];If[lst[[L]]==lst[[L-1]]&&OddQ[lst[[L]]],Print[lst[[L]]];AppendTo[lst1,lst[[L]]]]]],{a,b-1,3,-1}],{b,4,4*7!}];lst1

Extensions

a(20) - a(36) Robert G. Wilson v, Jul 12 2010