login
A088587
Difference between the two segments of edge d = A089025(n) partitioned by cevian c = A088513(n).
2
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).
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
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