clear all;
Ximage=double(imread('e:\work\Lena.jpg'));%待隱藏圖像

[m,n]=size(Ximage);
key1=4;
key2=0.1;
%     for(i=1:m)
%         for(j=1:n)
%            key2=key1*key2*(1-key2);
%            Kimage1(i,j)=key2;
%         end
%      end
%  
 key3=0.2;
%     for(i=1:m)
%         for(j=1:n)
%            key3=key1*key3*(1-key3);
%            Kimage2(i,j)=key3;
%         end
%      end
 key4=0.3;
%     for(i=1:m)
%         for(j=1:n)
%            key4=key1*key4*(1-key4);
%            Kimage3(i,j)=key4;
%         end
%      end
      Kimage1=logisticmatrix(key1,key2,m,n);
      Kimage2=logisticmatrix(key1,key3,m,n);
      Kimage3=logisticmatrix(key1,key4,m,n);
      t=0.9;
      for(i=1:m)
        for(j=1:n)
           key5=(1-t)*(1-t)*Kimage3(i,j)+2*t*(1-t)*Kimage2(i,j)+t*t*Kimage3(i,j);
           Kimage4(i,j)=key5;
        end
     end
     figure(1)
     imshow(Kimage3,[]);
     figure(2)
     imshow(Kimage4,[]);