1function y = fcn(image, level)
2
3coder.extrinsic('imresize','imshow','im2bw','imsubtract','graythresh');
4coder.extrinsic('bwareaopen','regionprops');
5
6Scale = 1/4;
7yc= 0;
8
9simage = imresize(image, Scale);
10sG_image = rgb2gray(simage);
11
12sR_image = simage(:,:,1);
13
14
15M_image = imsubtract(sR_image,sG_image);
16
17
18head = im2bw(M_image,level);
19
20
21[gc,yc] = max(mean(head,2));
22
23
24y = -yc + (120 * Scale);
25
26
27