-
大小: 12.01MB文件類(lèi)型: .rar金幣: 1下載: 0 次發(fā)布日期: 2023-07-29
- 語(yǔ)言: 其他
- 標(biāo)簽: 數(shù)學(xué)建模??競(jìng)賽??
資源簡(jiǎn)介
2008年全國(guó)大學(xué)生數(shù)學(xué)建模競(jìng)賽優(yōu)秀論文--A題
代碼片段和文件信息
format?long;
[p1txt1raw1]=xlsread(‘d:/1.xls‘);
[p2txt2raw2]=xlsread(‘d:/2.xls‘);
[p3txt3raw3]=xlsread(‘d:/3.xls‘);
[p4txt4raw4]=xlsread(‘d:/4.xls‘);
[p5txt5raw5]=xlsread(‘d:/5.xls‘);
qd=ones(64);
P=imread(‘picture.bmp‘);
imshow(P);
hold?on;
%第1組?圓13
[min1?i]=min(p1(:1));
qd(11)=i;
[min3?i]=min(p3(:1));
qd(12)=i;
size1=size(p1);
size3=size(p3);
flag=1;
while?flag>0
????flag=0;
????for?i=1:size1(1)
?????????if?p1(i1)<(p1(qd(11)1)-p3(qd(12)1))/(p1(qd(11)2)-p3(qd(12)2))*(p1(i2)-(p1(qd(11)2)))+p1(qd(11)1)
?????????????qd(11)=i;
?????????????flag=1;
?????????end
????end
????for?i=1:size3(1)
?????????if?p3(i1)<(p1(qd(11)1)-p3(qd(12)1))/(p1(qd(11)2)-p3(qd(12)2))*(p3(i2)-(p1(qd(11)2)))+p1(qd(11)1)
?????????????qd(12)=i;
?????????????flag=1;
?????????end
????end
end
for?i=1:1024
????y(i)=(p1(qd(11)1)-p3(qd(12)1))/(p1(qd(11)2)-p3(qd(12)2))*(i-(p1(qd(11)2)))+p1(qd(11)1);
end
plot([1:1024]y);
hold?on;
%另一條切線
[max1?i]=min(p1(:1));
qd(13)=i;
[max3?i]=min(p3(:1));
qd(14)=i;
size1=size(p1);
size3=size(p3);
flag=1;
while?flag>0
????flag=0;
????for?i=1:size1(1)
?????????if?p1(i1)>(p1(qd(13)1)-p3(qd(14)1))/(p1(qd(13)2)-p3(qd(14)2))*(p1(i2)-(p1(qd(13)2)))+p1(qd(13)1)
?????????????qd(13)=i;
?????????????flag=1;
?????????end
????end
????for?i=1:size3(1)
?????????if?p3(i1)>(p1(qd(13)1)-p3(qd(14)1))/(p1(qd(13)2)-p3(qd(14)2))*(p3(i2)-(p1(qd(13)2)))+p1(qd(13)1)
?????????????qd(14)=i;
?????????????flag=1;
?????????end
????end
end
for?i=1:1024
????y(i)=(p1(qd(13)1)-p3(qd(14)1))/(p1(qd(13)2)-p3(qd(14)2))*(i-(p1(qd(13)2)))+p1(qd(13)1);
end
plot([1:1024]y);
hold?on;
%第2組?圓45
[min4?i]=min(p4(:1));
qd(21)=i;
[min5?i]=min(p5(:1));
qd(22)=i;
size4=size(p4);
size5=size(p5);
flag=1;
while?flag>0
????flag=0;
????for?i=1:size4(1)
?????????if?p4(i1)<(p4(qd(21)1)-p5(qd(22)1))/(p4(qd(21)2)-p5(qd(22)2))*(p4(i2)-(p4(qd(21)2)))+p4(qd(21)1)
?????????????qd(21)=i;
?????????????flag=1;
?????????end
????end
????for?i=1:size5(1)
?????????if?p5(i1)<(p4(qd(21)1)-p5(qd(22)1))/(p4(qd(21)2)-p5(qd(22)2))*(p5(i2)-(p4(qd(21)2)))+p4(qd(21)1)
?????????????qd(22)=i;
?????????????flag=1;
?????????end
????end
end
for?i=1:1024
????y(i)=(p4(qd(21)1)-p5(qd(22)1))/(p4(qd(21)2)-p5(qd(22)2))*(i-(p4(qd(21)2)))+p4(qd(21)1);
end
plot([1:1024]y);
hold?on;
%另一條切線
[max4?i]=min(p4(:1));
qd(23)=i;
[max5?i]=min(p5(:1));
qd(24)=i;
size4=size(p4);
size5=size(p5);
flag=1;
while?flag>0
????flag=0;
????for?i=1:size4(1)
?????????if?p4(i1)>(p4(qd(23)1)-p5(qd(24)1))/(p4(qd(23)2)-p5(qd(24)2))*(p4(i2)-(p4(qd(23)2)))+p4(qd(23)1)
?????????????qd(23)=i;
?????????????flag=1;
?????????end
????end
????for?i=1:size5(1)
?????????if?p5(i1)>(p4(qd(23)1)-p5(qd(24)1))/(p4(qd(23)2)-p5(qd(24)2))*(p5(i2)-(p4(qd(23)2)))+p4(qd(23)1)
??????????
?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----
?????文件?????334756??2008-12-13?15:15??A\2105373\論文\數(shù)碼相機(jī)定位.pdf
?????文件??????25088??2008-09-20?10:20??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集\1.xls
?????文件??????24576??2008-09-20?10:20??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集\2.xls
?????文件??????23552??2008-09-20?10:20??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集\3.xls
?????文件??????23552??2008-09-20?10:20??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集\4.xls
?????文件??????22528??2008-09-20?10:20??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集\5.xls
?????文件??????10558??2008-09-22?02:53??A\2105373\源代碼\gongqiexian.m
?????文件????????151??2008-09-22?03:25??A\2105373\源代碼\jiaodian.m
?????文件????????301??2008-09-22?01:17??A\2105373\源代碼\jiaodian2.m
?????文件???????2214??2008-09-22?02:50??A\2105373\源代碼\m1.m
?????文件???????1287??2008-09-21?15:36??A\2105373\源代碼\moni.m
?????文件???????1296??2008-09-22?03:15??A\2105373\源代碼\moni2.m
?????文件???????1293??2008-09-22?03:16??A\2105373\源代碼\moni3.m
?????文件????3152954??2008-09-19?13:41??A\2105373\源代碼\picture.bmp
?????文件????????867??2008-09-22?03:45??A\2105373\源代碼\代碼說(shuō)明.txt
?????文件????1895708??2009-04-21?21:56??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\08高教社杯.pdf
?????文件?????972428??2009-04-21?15:58??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\001.jpg
?????文件?????871496??2009-04-21?16:04??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\002.jpg
?????文件????1003428??2009-04-21?16:10??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\003.jpg
?????文件?????816805??2009-04-21?16:12??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\004.jpg
?????文件?????888022??2009-04-21?16:15??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\005.jpg
?????文件?????918886??2009-04-21?16:17??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\006.jpg
?????文件?????962007??2009-04-21?16:22??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\007.jpg
?????文件?????913950??2009-04-21?16:24??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\008.jpg
?????文件????1044872??2009-04-21?16:26??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\009.jpg
?????文件?????876787??2009-04-21?16:28??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\010.jpg
?????文件?????919152??2009-04-21?16:30??A\透視投影中圓心投影定位和雙目立體系統(tǒng)標(biāo)定\011.jpg
?????文件?????414212??2009-02-24?11:27??A\26_170256_.rar
?????目錄??????????0??2009-05-16?07:55??A\2105373\數(shù)據(jù)\邊緣點(diǎn)集
?????目錄??????????0??2009-05-16?07:55??A\2105373\論文
............此處省略8個(gè)文件信息
評(píng)論
共有 條評(píng)論