- 1、本文档共8页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
专业资料
word完美格式
剩余矩形算法的MATLAB实现
河海大学12级物理(1)班
段付谋 1210020111
function mathmode_l
size=zeros(25,2);%表示小矩形的尺寸.M(i,1)、M(i,2)分别表示序号为 i 的小矩形的宽和高.
D=zeros(25,2);%排样方案数组.D(i,1)、D(i,2)分别表示第i个矩形的序号以及r(i).
rest=zeros(50,4);%剩余矩形数组.记录每个矩形的左下角坐标(x,y)、宽和高.
A=zeros(25,4);%记录数组(记录每个矩形件在样板上的位置).
%初始值均为零。(zeros)
size=[12,6;4,7;6,7;10,2;2,5;6,4;4,2;4,6;7,9;4,5;6,4;4,6;6,3;4,5;2,4;8,4;8,6;8,3;6,3;2,6;8,2;3,5;2,5;3,4;2,4;];%小矩形件的尺寸.
P1=zeros(1,25);P2=zeros(1,25);P3=zeros(1,25);
R1=zeros(1,25);R2=zeros(1,25);R3=zeros(1,25);
P1=[4,2,1,3,6,5,7,9,8,10,11,12,14,13,19,15,18,17,20,16,21,22,24,23,25];
R1=[1,1,1,1,1,1,1,1,1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1];
P2=[10,5,1,13,23,24,22,8,14,4,7,25,11,19,6,2,16,20,18,9,17,3,12,15,21];
R2=[ 0,1,1, 1, 0, 1, 1,0, 1,1,1, 0, 0, 1,1,1, 0, 1, 0,0, 0,1, 1, 0, 0];
P3=[23,21,20,16,17,2,24,25,9,3,5,8,22,14,15,18,7,6,10,19,4,12,11,13,1];
R3=[0, 0, 1, 0, 1,1, 0, 0,0,1,0,1, 0, 0, 0, 1,0,1, 1, 0,1, 0, 1, 0,0];
D1=[P1,R1];D2=[P2,R2];D3=[P3,R3];%至此,数据初始化完毕
D=D3; %选择排样方案.
w=zeros(25,1);h=zeros(25,1);%矩形件的宽和高
N=1; %N是剩余矩形的个数.
rest(1,:)=[0,0,15,60];%样板的尺寸设为:宽15,高60.
H=0;% 占用高度,用来求样板利用率.
for i=1:25 %矩形件i的宽和高
w(i)=size(D(i,1),1+D(i,2));h(i)=size(D(i,1),2-D(i,2));
end
re=zeros(30,4);
for i=1:25 %放置25个矩形件
%i=3;
n=1;j=0;
while n=N %求能包含小矩形件的剩余矩形 re,j表示个数.
if rest(n,3)=w(i)rest(n,4)=h(i)
j=j+1;re(j,:)=rest(n,:);
end
n=n+1;
end
k=2;
while k=j %求用到的剩余矩形(放在re的第一行),根据BL条件.
if re(k,2)re(1,2)||(re(k,2)==re(1,2)re(k,1)re(1,1))
re(1,:)=re(k,:);
end
k=k+1;
end
A(i,1)=re(1,1); A(i,2)=re(1,2);A(i,3)=w(i);A(i,4)=h(i);%第i个矩形件的位置信息
if H(A(i,2)+A(i,4)) % 占用高度的更新.
H=(A(i,2)+A(i,4));
end
%剩余矩形数组的处理更新.N A(i,)
n=1;Now=N;
while n=Now;
m=0;
k=N+1; %
if (A(i,2)rest(n,2))(A(i,2)(rest(n,2)+rest(n,4)))(A(i,1)rest(n,1)+rest(n,3))(A(i,1)+A(i,3)rest(n,1
您可能关注的文档
- 毕业设计__住宅小区给水排水管网综合设计说明书.doc
- 变限积分确定的函数的性质与应用.doc
- 变压器安装工程技术标书.doc
- 便携式心率采集系统设计说明书.doc
- 部编教材一下语文字词复习资料全.doc
- 部编小学语文二年级[下册]14小马过河.ppt
- 餐饮菜单种类与设计说明书.ppt
- 操作系统_进程调度模拟算法(附源码).doc
- 超级详细音标讲解教程(不后悔).ppt
- 超临界CO2萃取技术.ppt
- 小学科学:ESP8266智能插座电路原理与动手实践研究教学研究课题报告.docx
- 《金融开放浪潮下我国多层次监管体系构建与创新研究》教学研究课题报告.docx
- 区域教育质量监测中人工智能应用的数据质量分析与优化策略教学研究课题报告.docx
- 《金融科技监管中的数据治理与合规性要求》教学研究课题报告.docx
- 《3D打印技术在航空航天领域中的多材料制造与复合材料应用》教学研究课题报告.docx
- 《绿色金融发展中的政府职能与市场机制研究》教学研究课题报告.docx
- 《植物工厂多层立体栽培光环境调控技术对植物生长发育节律的调控机制探讨》教学研究课题报告.docx
- 销售团队年度业绩总结.docx
- 银行风险管理与金融危机防范.docx
- 银行网络攻击预警与快速响应机制.docx
文档评论(0)