Add an about window.

[master-thesis.git] / Parasitemia / Parasitemia / KMedians.fs

diff --git a/Parasitemia/Parasitemia/KMedians.fs b/Parasitemia/Parasitemia/KMedians.fs
index 8a3fd2b..d005651 100644 (file)
--- a/Parasitemia/Parasitemia/KMedians.fs
+++ b/Parasitemia/Parasitemia/KMedians.fs
@@ -12,8 +12,8 @@ type Result = {
     median_fg: float
     d_fg: Image<Gray, float32> } // Euclidean distances of the foreground to median_fg.
 
-let kmedians (img: Image<Gray, float32>) (fgFactor: float) : Result =
-    let nbIteration = 3
+let kmedians (img: Image<Gray, float32>) : Result =
+    let nbIteration = 4
     let w = img.Width
     let h = img.Height