1、两类不够，不能很好的分离色彩：
ClusteringComponents[img,2]//Colorize
2、分三类就好多了：
ClusteringComponents[img,3]//Colorize
3、分类之后，再做二值处理：
mask=ClusteringComponents[img,3]//Colorize //Binarize[#,0.5]&
这是一个掩膜，或者叫做蒙板。
4、对掩膜进行膨胀处理，再检测边界：
mask0=Dilation[mask,3]//EdgeDetect
5、对掩膜进行腐蚀处理，再检测边界：
mask1=Erosion[mask,3]//EdgeDetect
6、提取红色花瓣部分：
c=GrowCutComponents[img,{mask0,mask1}];
SetAlphaChannel[img,Image[c-1]]
