A083883 Odd short leg of more than one primitive Pythagorean triangle.
33, 39, 51, 57, 65, 69, 75, 85, 87, 93, 95, 105, 111, 115, 119, 123, 129, 133, 135, 141, 145, 147, 155, 159, 161, 165, 175, 177, 183, 185, 189, 195, 201, 203, 205, 207, 213, 215, 217, 219, 225, 231, 235, 237, 245, 249, 255, 259, 261, 265, 267, 273, 279, 285
Offset: 1
Keywords
Links
- Ray Chandler, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A081874.
Programs
-
Mathematica
Take[Transpose[Select[Tally[Transpose[Union[Sort/@({Times@@#,(Last[#]^2- First[#]^2)/2}&/@(Select[Subsets[Range[1,501,2],{2}],GCD@@#==1&]))]][[1]]], OddQ[#[[1]]]&[[2]]>1&]][[1]],60] (* Harvey P. Dale, May 28 2015 *)
Extensions
Corrected and extended by Ray Chandler, Oct 29 2003