基于ImageJ的粒子光斑检视器

问题

在对粒子进行分类过滤的时候

常常会出现一些假阳性或者假阴性的情况

为了提高粒子过滤的准确性

就希望能够针对一些程序自动判断出错的少数个例

进行参数的优化调整

我们希望实现的功能是

点击图像上某个粒子光斑

程序会输出这个粒子光斑的截图

以及粒子分类结果和粒子对应参数

代码

//particle picker 手动版本，单击图像中某个粒子，即可显示其类别和基本信息

//截图区域半径为8，先获取粒子光斑截图
size = 8;

leftButton = 16;
flags = 0;
ID = getTitle();
while(flags&leftButton == 0) getCursorLoc(x,y,z,flags);
showMessage("Mark Particle Center:"+x+","+y);
makeRectangle(x-size,y-size,2*size+1,2*size+1);
run("Duplicate...","title=particle");

//--------------
 function pcheck(x,y){
 	s = 17;
 	n = (s-1)/2;
 	bri = newArray(n);
 	
 	makeRectangle(x-n-1,y-n-1,s,s);
 	getStatistics(area, mean, min, max, std, histogram);
 	if (mean<60){
 		setMinAndMax(min,max);
 	} // 为弱信号准备的
 	
 	for(i=0;i<n;i++){
 		makeRectangle(x