Single Link clustering using matlab

%Single Link_Clustring
x=input('x=');
y=input('Y=');
subplot(2,1,1);
plot(x,y,'r*');
xlabel('x-Values')
ylabel('Y-Values')
n=length(x);
j=1;
i=1;
k=1;
  while j<n
    for i=i:n-1
       e_dis=sqrt(((x(i+1)-x(j)).^2)+((y(i+1)-y(j)).^2));
       d(k)=e_dis; %#ok<AGROW>
      k= k+1;
display(e_dis);

    end
    j=j+1;
    i=j;
  end
   m=min(d);
   display('Minimum Distance is');
   display(m)
   subplot(2,1,2)
       Y = pdist(x,'cityblock');
       Z = linkage(d,'single');
       [H, T] = dendrogram(Z);
       xlabel('Single link clustring Dendrogram');