商人过河问题matlab程序.doc_第1页
商人过河问题matlab程序.doc_第2页
商人过河问题matlab程序.doc_第3页
商人过河问题matlab程序.doc_第4页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

精品文档商人过河functionjueche=guohe%程序开始需要知道商人和仆人数；n=input(输入商人数目:);nn=input(输入仆人数目:);nnn=input(输入船的最大容量:);ifnnnn=input(输入商人数目:);nn=input(输入仆人数目:);nnn=input(输入船的最大容量:);end%决策生成jc=1;%决策向量放在矩阵d中，jc为插入新元素的行标初始为1；for i=0:nnnfor j=0:nnnif(i+j0)%满足条D=(u,v)|1=u+v=j)&(n-i)=(nn-j)|(i=0)|(i=n)%(i=j)&(n-i)=(nn-j)|(i=0)|(i=n)为可以存在状态的约束条件A(kx,1:3)=i,j,1;%生成状态数组集合DA(kx+1,1:3)=i,j,0;kx=kx+2;endendj=nn;end;%将状态向量生成抽象矩阵k=(1/2)*size(A,1);CX=zeros(2*k,2*k);a=size(d,1);for i=1:2*kfor j=1:ac=A(i,:)+d(j,:);x=find(A(:,1)=c(1)&(A(:,2)=c(2)&(A(:,3)=c(3);v(i,x)=1;%x为空不会改变v值endend%dijstra算法x=1;y=size(A,1);m=size(v,1);T=zeros(m,1);T=T.-1;lmd=T;P=T;S=zeros(m,1);S(x)=1;P(x)=0;lmd(x)=0;k=x;while(1)a=find(S=0);aa=find(S=1);if size(aa,1)=mbreak;endfor j=1:size(a,1)pp=a(j,1);if v(k,pp)=0if T(pp)(P(k)+v(k,pp)T(pp)=(P(k)+v(k,pp);lmd(pp)=k;endendendmi=min(T(a);if mi=infbreak;elsed=find(T=mi);d=d(1);P(d)=mi;T(d)=inf;k=d;S(d)=1;endendif lmd(y)=infjueche=cannotreach;return;endjueche(1)=y;g=2;h=y;while(1)if h=xbreak;endjueche(g)=lmd(h);g=g+1;h=lmd(h);endjueche=A(jueche,:);jueche(:,3)=;欢迎
人人文库> 全部分类> 应用文书 > 事务文书

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论