gusucode.com > 小波变换的数字水印matlab源码程序 > new_wavelet/Block.m
function A=Block(IM,p,q) %对图像进行分块 [m,n] = size(IM); IJ = zeros(p,q); z = 1; for m1 = 1:m/p for n1 = 1:n/q if m1*p <= m; if n1*q <= n; %%%%%取出一个p*q大小的块 for i = (m1-1)*p+1:m1*p for j = (n1-1)*q+1:n1*q IJ(i-(m1-1)*p,j-(n1-1)*q) = IM(i,j); if (i-(m1-1)*p)==p&&(j-(n1-1)*q)==q; OUT = IJ; A{1,z} = OUT; z = z+1; end end end end end end end