Diamètre

Concavité

Tumeur maligne

Non

Non

Non

Oui

Oui

Oui

Oui

Non

Oui

Oui

Voronoi

Frontière

Coloriage

A2: 13.2
B2: 8.3
A3: 18.7
B3: 19.7
A5: 13.2
B5: 9
A6: 13.5
B6: 4.8
A7: 11.8
B7: 1.7
A8: 13.6
B8: 1.9
A9: 12
B9: 2
A4: 18.2
B4: 17.7
A10: 12
B10: 6.60000000000001
A11: 8.20000000000002
B11: 15.9
A: (A2, B2)
B: (A3, B3)
C: (A4, B4)
D: (A5, B5)
l2: {A, B, C, D}
E: (A6, B6)
F: (A7, B7)
G: (A8, B8)
H: (A9, B9)
I: (A10, B10)
J: (A11, B11)
l1: {E, F, G, H, I, J}
K = (12.380730752135921, 12.822172315998293)
Distl2 = Sequence(Distance[K, Element[l2, k]], k, 1, Length[l2])
Distl1 = Sequence(Distance[K, Element[l1, k]], k, 1, Length[l1])
l3 = Sequence(If[Distance[K, Element[l2, k]] ≟ Min[Distl2], Segment[K, Element[l2, k]]], k, 1, Length[l2])
l4 = Sequence(If[Distance[K, Element[l1, k]] ≟ Min[Distl1], Segment[K, Element[l1, k]]], k, 1, Length[l1])
L: (A2, B2)
M: (A3, B3)
N: (A4, B4)
O: (A5, B5)
P: (A6, B6)
Q: (A7, B7)
R: (A8, B8)
S: (A9, B9)
T: (A10, B10)
U: (A11, B11)
l5: {L, M, N, O, P, Q, R, S, T, U}
graphe1 = Voronoi(l5)
c = Circle(B, C, J)
d = Circle(J, C, D)
e = Circle(J, D, I)
f = Circle(D, A, I)
g = Circle(A, I, E)
h = Circle(C, A, E)
k = Circle(C, E, G)
Lcercles: {c, d, e, f, g, h, k}
CentresCercles = Sequence(Center[Element[Lcercles, k]], k, 1, Length[Lcercles])
V = Point(graphe1)
W = Point(graphe1)
l6 = Union({V}, CentresCercles)
PointsLigne = Union(l6, {W})
i = PolyLine(PointsLigne)
p = Circle(K, Min[Distl1])
q = Circle(K, Min[Distl2])
a = false
b = false
R1 = Min(Distl1)
R2 = Min(Distl2)
K1: K
K2: K
K1': K1
K2': K2
j = false
l1' = Translate(l1, (0, 0))
l2' = Translate(l2, (0, 0))
l3': l3
l4': l4