A088587 Difference between the two segments of edge d = A089025(n) partitioned by cevian c = A088513(n).

2, 1, 11, 13, 26, 22, 23, 47, 13, 46, 11, 74, 61, 2, 37, 71, 107, 97, 23, 22, 118, 59, 146, 37, 143, 1, 109, 166, 191, 73, 83, 193, 26, 131, 94, 157, 11, 122, 239, 253, 59, 299, 73, 142, 286, 167, 169, 227, 362, 46, 121, 83, 277, 358, 218

Offset

1,1

Comments

a(n) is minimal, i.e., equals 1 for values c = A001570(n), d = A028230(n).

Links

Table of n, a(n) for n=1..55.

Formula

a(n) = sqrt(4c^2 - 3d^2).

Mathematica

findPrimIntEquiSectionDiff[maxC_] :=
Reap[Do[Do[
     With[{cevian = Abs[c E^((2 \[Pi] I)/6) - a]},
      If[FractionalPart[cevian] == 0 && GCD[a, c] == 1,
       Sow[c - 2 a]; Break[]]], {a, Floor[c/2],
      1, -1}], {c, maxC}]][[2, 1]]
(* Andrew Turner, Aug 04 2017 *)

Crossrefs

Cf. A088514.

Sequence in context: A038586 A140316 A295852 * A305711 A158352 A158354

Adjacent sequences: A088584 A088585 A088586 * A088588 A088589 A088590

Keyword

nonn

Author

Lekraj Beedassy, Nov 20 2003

Extensions

a(35)=94 and a(36)=157 order reversed by Andrew Turner, Aug 04 2017

Status

approved