X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FClassifier.fs;h=5a6dcbeed914e61d11fdaa9246beedee71ba82fd;hp=ea3f9ddeb3fe9b0ec3c1de31a7ff8f011fe14d94;hb=9343c4deb0bf88c58d9c92d465d8e99f64656875;hpb=154264f33619b78e17182082b483cba97e128698 diff --git a/Parasitemia/ParasitemiaCore/Classifier.fs b/Parasitemia/ParasitemiaCore/Classifier.fs index ea3f9dd..5a6dcbe 100644 --- a/Parasitemia/ParasitemiaCore/Classifier.fs +++ b/Parasitemia/ParasitemiaCore/Classifier.fs @@ -178,6 +178,8 @@ let findCells (ellipses: Ellipse list) (parasites: ParasitesMarker.Result) (widt darkStainPixels <- darkStainPixels + 1 if float darkStainPixels > config.Parameters.maxDarkStainRatio * (float nbElement) then Some e else None) + + // We do not change the state during the process to avoid to have peculiar neighbors which change the behavior of 'pixelOwnedByE'. |> List.iter (fun e -> e.State <- CellState.Peculiar) // 5) Define pixels associated to each ellipse and create the cells.