OFFSET

1,1

LINKS

Giovanni Resta, Table of n, a(n) for n = 1..10000

Michael Somos, Heronian Triangle Table

P. Yiu, Heron triangles with sides < 100, Recreational Mathematics, Appendix Chap. 9.3 pp. 81/360. (This is a download of 360 pages.)

MATHEMATICA

hQ[a_, b_, c_] := IntegerQ@ Sqrt@ Block[{s = (a+b+c)/2}, s (s-a) (s-b) (s-c)]; Reap[Do[If[ GCD[a, b, c] == 1 && hQ[a, b, c], Sow@c], {a, 60}, {b, a}, {c, a-b+1, b}]][[2, 1]] (* Giovanni Resta, May 21 2016 *)

CROSSREFS

KEYWORD

nonn

AUTHOR

Lekraj Beedassy, Jun 10 2006

STATUS

approved