figgen1.m

ICA watermarking. Blind, fragile, robust

%SE generan las gr醘icas del articulo del icassp 2001.
%Se escriben al directorio con el tex del articulo.
%Lee los datos del fichero exprlor.mat
close all

load exprlor

figure(1)
imshow(Mimg)
%axis('square')
clear Imm

print -depsc -r600 fig2a
%print -depsc -tiff -r600 fig1a



figure(1)      
imshow(MimgRcJ)  %imshow(smooth(MimgRc,0.01))
drawnow

print -depsc -r600 fig2b
%print -depsc -tiff -r600 fig1c


figure(1)
%II=MimgRcWM;
imshow(MimgRcWM3)
%axis('square')


print -depsc -r600 fig2c
%print -depsc -tiff -r600 fig1d


if 0
figure(1)
imshow(histeq(MimgWM))
axis('square')

print -depsc -r600 fig2d
%print -depsc -tiff -r600 fig1b
end