資源簡(jiǎn)介
用MATLAB做協(xié)方差矩陣,做K-L變換。降維重建的MATLAB編程。程序自己跑過(guò),親測(cè)有用,只需要修改輸入圖片就能用。

代碼片段和文件信息
a=imread(‘D:/234.jpg‘);
f=rgb2gray(a);
figure(1);
subplot(221);
imshow(f[]);
xlabel(‘原圖像‘);
mf=mean(f2);?
f=double(f);
[mn]=size(f);
cf2=0;
for?k=1:n
????cf1=f(:k)*f(:k)‘;
????cf2=cf2+cf1;
end
cf=cf2/n-mf*mf‘;
[BD]=eig(cf);
[ddes]=sort(diag(D)‘descend‘);
B=B(:des);
B=B‘;
sumb=sum(B.^22);
A=B./sqrt(sumb);
g8=A(1:8:)*(f-mf);
f8=A(1:8:)‘*g8+mf;
figure(1);
subplot(222);
imshow(f8[]);
xlabel(‘前8個(gè)特征向量‘);
g16=A(1:16:)*(f-mf);
f16=A(1:16:)‘*g16+mf;
figure(1);
subplot(223);
imshow(f16[]);
xlabel(‘前16個(gè)特征向量‘);
g32=A(1:32:)*(f-mf);
f32=A(1:32:)‘*g32+mf;
figure(1);
subplot(224);
imshow(f32[]);
xlabel(‘前32個(gè)特征向量‘);
g64=A(1:64:)*(f-mf);
f64=A(1:64:)‘*g64+mf;
figure(2);
subplot(221);
imshow(f64[]);
xlabel(‘前64個(gè)特征向量‘);
?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????文件????????817??2020-05-03?23:53??用matlab實(shí)現(xiàn)圖像KL變換\TT1.m
?????文件??????14954??2020-05-23?18:01??用matlab實(shí)現(xiàn)圖像KL變換\新建?Microsoft?Word?文檔.docx
?????目錄??????????0??2020-05-23?18:01??用matlab實(shí)現(xiàn)圖像KL變換
-----------?---------??----------?-----??----
????????????????15771????????????????????3
評(píng)論
共有 條評(píng)論