A046087 Middle member 'b' of the primitive Pythagorean triples (a,b,c) ordered by increasing c, then b.

4, 12, 15, 24, 21, 35, 40, 45, 60, 56, 63, 55, 77, 84, 80, 72, 99, 91, 112, 117, 105, 143, 144, 140, 132, 120, 165, 180, 153, 176, 168, 195, 156, 187, 171, 220, 221, 208, 209, 255, 247, 264, 260, 252, 231, 240, 285, 224, 273, 312, 308, 253, 323, 288, 299, 272

Offset

1,1

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

F. Richman, Pythagorean Triples

Eric Weisstein's World of Mathematics, Pythagorean Triple

Mathematica

maxHypo = 389; r[b_, c_] := Reduce[0 < a <= b < c && a^2 + b^2 == c^2, a, Integers]; Reap[Do[r0 = r[b, c]; If[r0 =!= False, {a0, b0, c0} = {a, b, c} /. ToRules[r0]; If[GCD[a0, b0, c0] == 1, Print[b0]; Sow[b0]]], {c, 1, maxHypo}, {b, 1, maxHypo}]][[2, 1]] (* Jean-François Alcover, Oct 22 2012 *)

Crossrefs

Cf. A046086, A020882.

Sequence in context: A020883 A002365 A212245 * A081872 A120097 A088510

Adjacent sequences: A046084 A046085 A046086 * A046088 A046089 A046090

Keyword

nonn,look

Author

Eric W. Weisstein

Status

approved