• <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 閱讀(3567) 評論(0)  編輯 收藏 引用

            亚洲国产成人久久一区久久| 久久WWW免费人成一看片| A级毛片无码久久精品免费| 久久久久亚洲AV成人网人人软件| 亚洲欧洲久久av| 2021精品国产综合久久| 久久se精品一区精品二区国产| 久久天天躁狠狠躁夜夜av浪潮| 一本一道久久综合狠狠老| 久久亚洲高清观看| 一本一本久久a久久综合精品蜜桃| 色综合久久88色综合天天| 亚洲精品乱码久久久久久| 欧美大战日韩91综合一区婷婷久久青草 | 久久久久久久尹人综合网亚洲| 老司机午夜网站国内精品久久久久久久久| 国产aⅴ激情无码久久| 久久精品成人免费观看97| 精品久久久噜噜噜久久久| 99久久香蕉国产线看观香 | 久久精品国产精品亜洲毛片| 国内精品久久久久久久久电影网 | 久久99精品国产麻豆蜜芽| 99久久精品影院老鸭窝| 久久久久久国产精品无码下载| 国产AⅤ精品一区二区三区久久 | 亚洲国产高清精品线久久| 国产精品成人99久久久久91gav| 久久精品毛片免费观看| 久久精品国产亚洲AV忘忧草18| 久久夜色精品国产www| 国产叼嘿久久精品久久| 国产成人精品久久亚洲| 久久久久夜夜夜精品国产| 久久久久国产一级毛片高清版| 丁香狠狠色婷婷久久综合| 国产精品久久精品| 91久久精品视频| 久久精品99无色码中文字幕| 久久久久18| 久久精品国产亚洲AV忘忧草18 |