
谁知道这段程序的是根据分形图像的哪种算法编写出来的~
mage1=imread('lena256.bmp');figure(1)imshow(Image1)[imagemimagen]=size(Image1);Sr=4;S...
mage1=imread('lena256.bmp');
figure(1)
imshow(Image1)
[imagem imagen]=size(Image1);
Sr=4;Sd=8;
Rnum=(imagem/Sr)*(imagen/Sr);%确定子块数组大小
Dnum=(imagem/Sd)*(imagen/Sd);%确定父块数组大小
Image2=zeros(Dnum,Sr,Sr);
Image2=blkproc(Image1,[Sd/Sr,Sd/Sr],'mean(mean(x))');
RBlocks=zeros(Rnum,Sr,Sr);
DBlocks=zeros(Dnum,Sd,Sd);
DBlocksReduce=zeros(Dnum*8,Sr,Sr);
for i=1:imagem/Sr
for j=1:imagen/Sr
k=(i-1)*imagen/Sr+j;
RBlocks(k,:,:)=Image1((i-1)*Sr+1:i*Sr,(j-1)*Sr+1:j*Sr);
end
end 展开
figure(1)
imshow(Image1)
[imagem imagen]=size(Image1);
Sr=4;Sd=8;
Rnum=(imagem/Sr)*(imagen/Sr);%确定子块数组大小
Dnum=(imagem/Sd)*(imagen/Sd);%确定父块数组大小
Image2=zeros(Dnum,Sr,Sr);
Image2=blkproc(Image1,[Sd/Sr,Sd/Sr],'mean(mean(x))');
RBlocks=zeros(Rnum,Sr,Sr);
DBlocks=zeros(Dnum,Sd,Sd);
DBlocksReduce=zeros(Dnum*8,Sr,Sr);
for i=1:imagem/Sr
for j=1:imagen/Sr
k=(i-1)*imagen/Sr+j;
RBlocks(k,:,:)=Image1((i-1)*Sr+1:i*Sr,(j-1)*Sr+1:j*Sr);
end
end 展开
1个回答

2025-02-25 广告
国际衍射数据中心(美国)北京代表处成立于2019年1月1日,是目前ICDD海外分支机构。旨在为PDF数据库和MDI软件用户提供咨询、技术支持,主办和协办相关科学会议以及公益性讲座,为在读研究生提供奖学金,为相关会议和科学研究者提供项目资助,...
点击进入详情页
本回答由国际衍射数据中心提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询