• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>

            The Fourth Dimension Space

            枯葉北風寒,忽然年以殘,念往昔,語默心酸。二十光陰無一物,韶光賤,寐難安; 不畏形影單,道途阻且慢,哪曲折,如渡飛湍。斬浪劈波酬壯志,同把酒,共言歡! -如夢令

            商人過河問題的Matlab實現(轉)

            function foot=chouxiang 

              
            %%%%%%%%%%%%%%%%%%%%%%    程序開始需要知道商人數,仆人數,船的最大容量
            n
            =input('輸入商人數目:');
            nn
            =input('輸入仆人數目:');
            nnn
            =input('輸入船的最大容量:');
              
            if nn>n
            n
            =input('輸入商人數目:');
            nn
            =input('輸入仆人數目:');
            nnn
            =input('輸入船的最大容量:'); 
              end 
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%    決策生成
               jc
            =1;    % 決策向量存放在矩陣“d”中,jc為插入新元素的行標初始為1
             
            for i=0:nnn                     
                  
                  
            for j=0:nnn                      
                    
            if (i+j<=nnn)&(i+j>0)     % 滿足條件  D={(u,v)|1<=u+v<=nnn,u,v=0,1,2} 
                      d(jc,
            1:3)=[i,j 1];   %生成一個決策向量后立刻將他擴充為三維(再末尾加“1”)
                      d(jc
            +1,1:3)=[-i,-j,-1];      %  同時生成他的負向量
                         jc
            =jc+2;         %  由于一氣生成兩個決策向量,jc指標需要往下移動兩個單位
                     end
                  end
                     j
            =0;                                    
                 
            end
             
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%     狀態數組生成

              kx
            =1;              % 狀態數組存放在矩陣“A”中,生成方法同決策生成
            for  i=n:-1:0
               
                
            for j=nn:-1:0
                   
                   
                    
            if  ((i>=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];                          % 生成狀態數組集合D`
                        A(kx
            +1,1:3)=[i,j,0];
                       
                        kx
            =kx+2;
                    end
                end
                 j
            =nn;
            end;
                   
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  將狀態數組生成抽象矩陣     
               

            k
            =(1/2)*size(A,1);                                      
              CX
            =zeros(2*k,2*k);
            a
            =size(d,1);
                       
                
                
              
            for i=1:2*k                               
                    
            for j=1:a
                        
                           c
            =A(i,:)+d(j,:) ;                 
                           x
            =find((A(:,1)==c(1))&(A(:,2)==c(2))&(A(:,3)==c(3))) ;
                           
                           v(i,x)
            =1;          % x為空不會改變v的值
                          
                    end                                             
              end
              
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 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)==m   
                       
            break;
                 end
               
            for j=1:size(a,1)
                      pp
            =a(j,1); 
                    
            if  v(k,pp)~=0 
                          
            if T(pp)>(P(k)+v(k,pp))
                           T(pp)
            =(P(k)+v(k,pp));
                           lmd(pp)
            =k;
                          end   
                    end
               end       
               mi
            =min(T(a));
               
            if mi==inf          
                     
            break;
               
            else
                     d
            =find(T==mi);
                     d
            =d(1);
                     P(d)
            =mi; 
                     T(d)
            =inf;       
                     k
            =d;
                     S(d)
            =1;   
               end
            end
             


            if lmd(y)==inf
               foot
            ='can not reach';
               
            return;
            end

            foot(
            1)=y;
            g
            =2; h=y;
            while(1)        
                
            if h==x
                  
            break;
                end
                   foot(g)
            =lmd(h);
                   g
            =g+1;
                   h
            =lmd(h);
            end   
              
            foot
            =A(foot,:);
            foot(:,
            3)=[];


            這個代碼比我上回寫的C++代碼短很多。。。。。。看來還是Matlab強大丫 一定要盡快學會才行 :-)

            posted on 2009-03-21 01:09 abilitytao 閱讀(3560) 評論(0)  編輯 收藏 引用

            欧美黑人激情性久久| 久久www免费人成看片| 国产精品一久久香蕉产线看| 国产亚洲精品自在久久| 久久综合九色综合久99| 亚洲国产成人久久综合区| 久久亚洲精品国产亚洲老地址 | 久久99精品国产一区二区三区| 2021久久精品国产99国产精品| 品成人欧美大片久久国产欧美...| 久久精品国产亚洲AV不卡| 97精品伊人久久久大香线蕉| 色综合久久精品中文字幕首页| 一级a性色生活片久久无| 99久久精品毛片免费播放| 亚洲欧美精品一区久久中文字幕| 国产亚洲综合久久系列| 亚洲精品乱码久久久久久蜜桃不卡 | 久久午夜无码鲁丝片| 久久人人爽人人爽人人片AV麻豆| 97香蕉久久夜色精品国产| 婷婷久久综合九色综合98| 久久午夜夜伦鲁鲁片免费无码影视 | 97精品依人久久久大香线蕉97 | 精品久久久久久亚洲| 亚洲人成精品久久久久| 久久久久这里只有精品| 色综合合久久天天综合绕视看| 久久精品99久久香蕉国产色戒| 亚洲日本va午夜中文字幕久久| 久久精品国产精品亚洲艾草网美妙| 国产精品免费福利久久| 精品久久久久久中文字幕人妻最新| 久久无码国产专区精品| 久久无码AV一区二区三区| 日日狠狠久久偷偷色综合0| 久久久久成人精品无码| 久久久久久久久久免免费精品| 国产精品免费久久久久影院| 国产精品一区二区久久精品无码 | 亚洲精品乱码久久久久久不卡|