X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FConfig.fs;h=81591736a782d9147a9ec1f723274f1d3fc8d434;hb=154264f33619b78e17182082b483cba97e128698;hp=67b9ce3df31bcbd23bbc1d0e1ac3546c524ccc82;hpb=9a025e7d947ffbe097eb844f3214fbc95e134f7c;p=master-thesis.git diff --git a/Parasitemia/ParasitemiaCore/Config.fs b/Parasitemia/ParasitemiaCore/Config.fs index 67b9ce3..8159173 100644 --- a/Parasitemia/ParasitemiaCore/Config.fs +++ b/Parasitemia/ParasitemiaCore/Config.fs @@ -35,12 +35,13 @@ type Parameters = { parasiteRadiusRatio: float32 // The ratio of the parasite radius of the RBC radius. minimumParasiteAreaRatio: float32 // Factor of a RBC area. 0.5 means the half of RBC area. + cytoplasmSizeRatio: float32 cytoplasmSensitivity: float // between 0 (the least sensitive) and 1 (the most sensitive). nucleusAreaRatio: float32 // Factor of a RBC area. 0.5 means the half of RBC area. infectionSensitivity: float // between 0 (the least sensitive) and 1 (the most sensitive). - standardDeviationMaxRatio: float // The standard deviation of the pixel values of a cell can't be greater than standardDeviationMaxRatio * global standard deviation + // [] standardDeviationMaxRatio: float // The standard deviation of the pixel values of a cell can't be greater than standardDeviationMaxRatio * global standard deviation minimumCellAreaFactor: float32 } // Factor of the mean RBC area. A cell with an area below this will be rejected. let defaultParameters = { @@ -59,20 +60,21 @@ let defaultParameters = { nbPickElementsMin = 10 factorNbValidPick = 0.06 //1.0 - factorNbMaxPick = 2. + factorNbMaxPick = 4. - darkStainLevel = 0.25 + darkStainLevel = 1. maxDarkStainRatio = 0.1 // 10 % - parasiteRadiusRatio = 0.5f // 40 % - + parasiteRadiusRatio = 0.5f // 50 % minimumParasiteAreaRatio = 0.02f // 2 % + + cytoplasmSizeRatio = 1.f / 5.f cytoplasmSensitivity = 0.96 nucleusAreaRatio = 0.01f // 1.0 % infectionSensitivity = 0.92 - standardDeviationMaxRatio = 0.6 + // standardDeviationMaxRatio = 0.6 // Obsolete. minimumCellAreaFactor = 0.4f } type RBCRadius (radius: float32, parameters: Parameters) = @@ -87,6 +89,7 @@ type RBCRadius (radius: float32, parameters: Parameters) = member this.MinArea = parameters.minimumCellAreaFactor * this.Area member this.ParasiteRadius = parameters.parasiteRadiusRatio * radius + member this.CytoplasmSize = parameters.cytoplasmSizeRatio * radius member this.NucleusArea = parameters.nucleusAreaRatio * this.Area member this.MinimumParasiteArea = parameters.minimumParasiteAreaRatio * this.Area