function?[CLUTo]=fisheyecorbil（ARratio）%
%----------------------雙線性插值法縮放矩陣或圖像---------------------------
%?Input：
%???????A：圖像變量
%???????R:圖像半徑
%???????ratio:校正圖像與原圖像比率：取3，控制隱射范圍
%?Output：
%???????C：校正后的圖像
%???????LUTo：算得的校正圖像對應魚眼圖像像素位置的表格：用于后期在硬件上實驗
%reference：《基于幾何成像模型的魚眼鏡頭圖像校正算法和技術研究》?機電工程學報
????????
%-------------------------------------------------------------------
????%%%%????Authors:???Tan?xiang?bin
????%%%%????Guilin?University?of?Electronic?Technology?Student
????%%%%????EMAIL:?????125366663@qq.com
????%%%%????DATE:??????16-12-2013
%%
[whd]=size（A）;
%?xo=w/2;%中心原點
%?yo=h/2;
xo=638.4;%魚眼圖像中心原點（這個不變）
yo=640.2;
xc=ratio*w/2;%校正圖中心原點
yc=ratio*h/2;
f=2*R/pi;%焦距計算
C=zeros（whd）;
LUTo=zeros（w*h2）;
?index=1;%用作填LUT的參數
for?u=1:3:ratio*h
????for?v=1:3:ratio*w
????????ho=sqrt（（u-xc）^2+（v-yc）^2）;%校正圖像距離中心距離
????????if（ho==0）?????????????????%若距離中心距離為0則直接填充魚眼圖像中心像素
????????????C（（u-1）/3+1（v-1）/3+11）?=A（6346341）;%填充魚眼圖像像素
????????????C（（u-1）/3+1（v-1）/3+12）?=A（6346342）;
???????????C（（u-1）/3+1（v-1）/3+13）?=A（6346343）;
????????else
????????????h1=f*atan2（hof）;%魚眼圖像上的像高
????????????x=h1*（u-xc）/ho+xo;%對應魚眼圖像點坐標
????????????y=h1*（v-yc）/ho+yo;
%?????????????x=abs（round（x））;%最鄰近插值
%?????????????y=abs（round（y））;
????????????x1=floor（x）;y1=floor（y）;%雙線性插值
????????????u1=x-x1;
????????????v1=y-y1;
????????????C（（u-1）/3+1（v-1）/3+11）?=?（1-u1）*（1-v1）*A（x1y11）?+（1-u1）*v1*A（x1y1+11）...
????????????????????+?u1*（1-v1）*A（x1+1y11）?+u1*v1*A（x1+1y1+11）;
?????????????C（（u-1）/3+1（v-1）/3+12）?=?（1-u1）*（1-v1）*A（x1y12）?+（1-u1）*v1*A（x1y1+12）...
????????????????????+?u1*（1-v1）*A（x1+1y12）?+u1*v1*A（x1+1y1+12）;
?????????????C（（u-1）/3+1（v-1）/3+13）?=?（1-u1）*（1-v1）*A（x1y13）?+（1-u1）*v1*A（x1y1+13）...
????????????????????+?u1*（1-v1）*A（x1+1y13）?+u1*v1*A（x1+1y1+13）;?????
????????????LUTo（index:）=[xy];%將計算得到的
????????????index=index+1;
????????end
????end
end
C=uint8（C）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????2186??2016-12-06?17:42??幾何模型校正入門實驗\fisheyecorbil.m

?????文件????????294??2016-12-06?17:43??幾何模型校正入門實驗\readme.txt

?????文件????????126??2016-12-06?17:26??幾何模型校正入門實驗\testscript.m

?????文件????6553654??2016-09-07?11:45??幾何模型校正入門實驗\wanglinrong.bmp

?????文件????1106917??2016-09-07?10:07??幾何模型校正入門實驗\參考論文\基于幾何成像模型的魚眼鏡頭圖像校正算法和技術研究_李根.pdf

?????目錄??????????0??2016-12-06?17:44??幾何模型校正入門實驗\參考論文

?????目錄??????????0??2016-12-06?17:43??幾何模型校正入門實驗

-----------?---------??----------?-----??----

??????????????7663177????????????????????7