let doAnalysis (img: Image<Bgr, byte>) (name: string) (config: Config) : Cell list =
- let scaledImg = if config.Parameters.scale = 1.0 then img else img.Resize(config.Parameters.scale, CvEnum.Inter.Area)
-
- use green = scaledImg.Item(1)
+ use green = img.Item(1)
let greenFloat = green.Convert<Gray, float32>()
let filteredGreen = gaussianFilter greenFloat (float config.Parameters.preFilterSigma)
drawEllipses imgAllEllipses allEllipses (Bgr(0.0, 240.0, 240.0)) 0.05
saveImg imgAllEllipses (buildFileName " - ellipses - all.png")
- let imgEllipses = img.Copy()
+ let imgEllipses = filteredGreenWhitoutStain.Convert<Bgr, byte>()
drawEllipses imgEllipses ellipses (Bgr(0.0, 240.0, 240.0)) 1.0
saveImg imgEllipses (buildFileName " - ellipses.png")
saveImg green (buildFileName " - green.png")
- use blue = scaledImg.Item(0)
+ use blue = img.Item(0)
saveImg blue (buildFileName " - blue.png")
- use red = scaledImg.Item(2)
+ use red = img.Item(2)
saveImg red (buildFileName " - red.png")
| _ -> ()