20xx全國(guó)數(shù)學(xué)建模競(jìng)賽b題優(yōu)秀論文-資料下載頁(yè)
2025-08-09 04:25本頁(yè)面
【正文】 A(i,4)=13。 endendxlswrite(39。D:\39。,A)。 %將矩陣導(dǎo)入excel表里附錄七：%以下程序的運(yùn)行，請(qǐng)注意文件存放的位置！??！%此程序運(yùn)行需要時(shí)間較長(zhǎng)，請(qǐng)耐心等待！??！%請(qǐng)使用經(jīng)格式轉(zhuǎn)化器轉(zhuǎn)化后的JPG格式圖片A=zeros(209,209)。a=A(:,1)。%共209個(gè)紙條l=A(:,1)。%共209個(gè)紙條for j=1:209 str=39。D:\附件\附件3\39。 I=imread([str,num2str(j),39。.jpg39。])。%依次讀取每一幅圖像 i1=rgb2gray(I)。 %i1灰度圖像 i2=im2bw(i1)。 % i2是二值圖像，一個(gè)180*72的矩陣 a=i2(:,1)。 %取紙片左邊緣 for i=1:209 I=imread([str,num2str(i),39。.jpg39。])。 %依次讀取每一幅圖像 i1=rgb2gray(I)。 %i1灰度圖像 i2=im2bw(i1)。 % i2是二值圖像 mi=i2(:,72)。 %取紙片左邊緣 ni=ami。 A(j,i)=sqrt(dot(ni,ni))。 %用以判斷差距 endendxlswrite(39。D:\39。,A)。 %將矩陣元素導(dǎo)入excel表格for i=1:209 for j=1:209 if(A(i,j)==0) l(i)=l(i)+1。 end endendfor i=1:209 if(l(i)=11) i endend附錄八：%以下程序的運(yùn)行，請(qǐng)注意文件存放的位置?。?！%請(qǐng)使用經(jīng)格式轉(zhuǎn)化器轉(zhuǎn)化后的JPG格式圖片。%%%%%%選取以008作為開(kāi)始第9組的行排序%%%%%%%A=zeros(19,19)。 a=[1,8,33,46,54,57,69,71,94,127,138,139,154,159,167,175,176,197,209。]%共十九個(gè)紙條for j=1:19 str=39。D:\附件\附件3\39。 s=a(j) I=imread([str,num2str(a(j)),39。.jpg39。])。%依次讀取每一幅圖像 i1=rgb2gray(I)。 %i1灰度圖像 i2=im2bw(i1)。 % i2是二值圖像 t=i2(:,72)。 %取紙片右邊緣 for i=1:19 I=imread([str,num2str(a(i)),39。.jpg39。])。 %依次讀取每一幅圖像 i1=rgb2gray(I)。 %i1灰度圖像 i2=im2bw(i1)。 % i2是二值圖像 mi=i2(:,1)。 %取紙片左邊緣 ni=tmi。 A(j,i)=sqrt(dot(ni,ni))。 endend%%%%%%%%判斷相鄰圖片并自動(dòng)連接%%%%%%%%%%r=[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]。%記錄和紙片右相鄰的紙片g=[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]。%記錄和紙片右相鄰的紙片for i=1:19 k=A(i,1)。 r(i)=1。 for j=1:19 if(kA(i,j)amp。amp。j~=2) k=A(i,j)。 r(i)=a(j)。 g(i)=j end endend first=2。str=39。D:\附件\附件3\39。z= imread([str,num2str(a(first)),39。.jpg39。])。for m=1:18 x=z。 y=imread([str,num2str(r(first)),39。.jpg39。])。%記錄下一張紙條 z = [x,y]。 first=g(first)。end imshow(z) %請(qǐng)打開(kāi)圖片顯示窗口查看拼接結(jié)果附件九：圖15 附件三的拼接圖片附錄十：圖16 附件4的拼接圖片附錄十一：%以下程序的運(yùn)行，請(qǐng)注意文件存放的位置?。?！%請(qǐng)使用經(jīng)格式轉(zhuǎn)化器轉(zhuǎn)化后的JPG格式圖片。A=zeros(19,19)。 a=[791 1121 1260 1410 1560 1510 1841 1751 1110 670 1090 191 300 1901 821 1651 210 480 1371900 111 370 771 1790 450 261 1930 1251 230 1211 1450 800 150 600 611 1480 1530 601871 1540 851 431 310 390 1220 990 951 621 1381 460 1390 571 1321 1881 871 2011 14412001 121 1620 1701 1951 1741 2071 1570 350 1821 1991 880 1331 940 731 1760 980 401 840891 1080 1501 1810 381 1920 661 1161 1671 21 1521 1711 420 711 1401 30 1631 2041 9101150 1851 1801 1171 2080 590 1590 1980 1551 291 130 181 1031 651 2090 1430 580 250 1401470 1721 320 2020 510 1911 931 201 171 1781 541 2030 221 1310 1640 1941 741 1600 3601661 1960 1290 1580 1690 470 680 641 761 1680 1181 91 691 1890 1280 410 1831 1230 173041 81 861 1491 780 50 700 330 751 1271 1770 1860 11 811 280 1361 1420 2051 1060241 1340 490 521 960 1611 1200 341 721 530 630 1301 1191 1020 161 2060 831 1460 1011000 440 971 1100 1240 70 1050 1350 1140 271 501 921 1071 1011 561 1040 1130 1971 551]。%共十九個(gè)紙條str=39。D:\附件\附件5\39。 I=imread([str,num2str(a(1,1)),39。.jpg39。])。%依次讀取每一幅圖像 for j=2:19 str=39。C:\Users\Administrator\Desktop\附件5\39。 J=imread([str,num2str(a(1,j)),39。.jpg39。])。%依次讀取每一幅圖像 I=[I,J]。 endfor i=2:11 str=39。D:\附件\附件5\39。 K=imread([str,num2str(a(i,1)),39。.jpg39。])。%依次讀取每一幅圖像 for j=2:19 str=39。C:\Users\Administrator\Desktop\附件5\39。 J=imread([str,num2str(a(i,j)),39。.jpg39。])。%依次讀取每一幅圖像 K=[K,J]。 end I=[I。K]。end imshow(I) %請(qǐng)打開(kāi)圖片顯示窗口查看拼接結(jié)果附錄十二：圖17 附件5的一面拼接圖片附錄十三：圖18 附件5的另一面拼接圖片29
試題試卷相關(guān)推薦
鄂ICP備17016276號(hào)-1