置乱变换matlab代码

%-------------------------------------------------------------------------%
%---------------------------    置乱变换程序    ---------------------------%
%-------------------------------------------------------------------------%
clear all;
close all;
clc;
%读取伪装图像
Img_imbed = imread（‘watermark.bmp‘）;
subplot（121）
imshow（Img_imbed）
title（‘原始图像‘）;
Img_imbed=double（Img_imbed）;
[nrowncol] = size（Img_imbed）;
I=48;
J=48;
N=ncol;
N1=nrow;
N2=10;
for time=1:N2
        for i=1:nrow
            if i<=I               %这里为行右移
                M=mod（I-i32）;
                for s=1:N-M
                    c（s）=Img_imbed（is）;
                end
                for n=N-M+1:N
                    b（n）=Img_imbed（in）;
                end    

                for j=1:N            
                     if j<=N-M
                         k=M+j;
                         Img_imbed（ik）=c（j）;                
                     else         
                          t=j-N+M;