how to close a open object in an image

I have a problem. I am trying to count objects but some of them are not closed and when I apply binarize code, it does not apply and appears distorted.

I=imread('Pollen1.tif');
figure, imshow(I),title('Original');

%Transforma a imagem em escala cinzento
I2=rgb2gray(I);
figure,imshow(I2),title('rgb2gray');
%Convert image to binary image, based on threshold
I4=im2bw(I3);
figure
imshow(I4);
%Remove small objects from binary image
I4=bwareaopen(I4,900);
figure
imshow(I4),title('bwareaopen');

%Find edges of objects in images using Sobel, Prewitt, Roberts, or Canny method
 I6=edge(imc,'Canny');
 figure
 imshow(I6),title('Canny');

[Image Analyst]

Unfortunately you forgot to attach Pollen1.tif so I can't do much until you do.

Also, please read this link so you know how to format your code correctly (I did it for you this time).

[Gabriel Martins]

I=imread('Pollen1.tif');
figure, imshow(I),title('Original');

%Transforma a imagem em escala cinzento

I2=rgb2gray(I);
figure,imshow(I2),title('rgb2gray');

%Convert image to binary image, based on threshold

I4=im2bw(I3);
figure
imshow(I4);

%Remove small objects from binary image

I4=bwareaopen(I4,900);
figure
imshow(I4),title('bwareaopen');

%Find edges of objects in images using Sobel, Prewitt, Roberts, or Canny method

   I6=edge(imc,'Canny');
   figure
   imshow(I6),title('Canny');

[Image Analyst]

Unfortunately you forgot to attach Pollen1.tif so I can't do much until you do.

[Gabriel Martins]

the image

[Image Analyst]

Code doesn't run. What is "I3"?

[Gabriel Martins]

sorry I3 is I2