cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A055595 Area of triangles with integer sides and positive integer area, ordered by longest side, then second longest side and finally shortest side.

Original entry on oeis.org

6, 12, 12, 24, 48, 30, 60, 54, 24, 84, 48, 36, 60, 120, 108, 66, 42, 96, 84, 126, 60, 108, 192, 90, 150, 84, 168, 120, 36, 204, 240, 210, 210, 60, 120, 216, 132, 300, 96, 336, 72, 192, 144, 240, 480, 294, 84, 252, 360, 432, 114, 156, 180, 210, 420, 120, 210, 420
Offset: 1

Views

Author

Henry Bottomley, May 26 2000

Keywords

Comments

This is the ordering of triangles used for A316841.

Crossrefs

The sides are given by A055592, A055593, A055594.
Range of values: A188158.

Programs

  • Mathematica
    max = 42; triangles = Reap[Do[s = (a+b+c)/2; area = Sqrt[s*(s-a)*(s-b)*(s-c)]; If[IntegerQ[area] && area > 0, Sow[{a, b, c, area}]], {a, 1, max}, {b, a, max}, {c, b, max}]][[2, 1]]; A055595 = Sort[triangles, #1[[3]]*max^2 + #1[[2]]*max + #1[[1]] < #2[[3]]* max^2 + #2[[2]]*max + #2[[1]] &][[All, 4]](* Jean-François Alcover, Jun 12 2012 *)

Formula

a(n) = sqrt(s(n)*(s(n)-A055592(n))*(s(n)-A055593(n))*(s(n)-A055594(n))) where s(n) = (A055592(n)+A055593(n)+A055594(n))/2 i.e. half the perimeter of the triangle