X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaCore%2FConfig.fs;h=81591736a782d9147a9ec1f723274f1d3fc8d434;hb=1b8e45987bde692ab5602c281f878707f70459b7;hp=d50ab0e2d02ec0d76d2acdea1e2ffb417342a1c0;hpb=18a450dd9264befbe5d3c1e611d52c2ac53079e4;p=master-thesis.git diff --git a/Parasitemia/ParasitemiaCore/Config.fs b/Parasitemia/ParasitemiaCore/Config.fs index d50ab0e..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 = { @@ -61,18 +62,19 @@ let defaultParameters = { factorNbValidPick = 0.06 //1.0 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