怎样运用matlab解决最优化问题

怎样运用matlab解决最优化问题,第1张

打开matlab2014a程序,在主工具栏找到应用程序一栏,打开optimization选项。

问题输入

在optimization程序中,首先根据不同的问题类型选择不同的模型,同时输入约束等。

选择优化程序运行的条件

在最中间的一栏中添加优化程序运行的条件,如优化截止的标准,画图的要求等等。

开始运算

点击start即可实现优化程序的运行,在图示的框中即可出现运行结果。

5

查看帮助文件

在程序的最右边,是一个帮助文件,如果你有什么疑问,可以直接在帮助文件中查找。

几个方面:

1、最大的问题是循环体里面的 pause(0.1),尤其是里面那一层循环。

2、很多赋值语句后面应该加分号,避免显示。

3、数组预置(对于这段代码而言不是很重要)。

里面那层的pause是在这样的循环结构中:

for k=1:10

    i=i+1

    for x=2:z-1

        for y=2:z-1

粗略估算一下,会执行10*18*18次,每次0.1秒,仅这一句就会耗时324秒。

删除上述pasue之后,在我的电脑上运行大约需要27秒。

有多处赋值语句的尾部没有使用分号,导致数组在命令窗口中回显,这也会占用很多时间。那些语句就不一一列举了,修改后的代码如下:

clear allclc

z=20i=0

a=cat(3,rand(z),rand(z),zeros(z))

b=a(:,:,1)%HSI

c=a(:,:,2)%生物量

imh=image(cat(3,c,zeros(z),zeros(z)))%先生成一个图像

for k=1:10

    i=i+1

    for x=2:z-1

        for y=2:z-1

            d{x,y}=[b(x-1,y-1),b(x-1,y),b(x-1,y+1)

                b(x,y-1),b(x,y),b(x,y+1)

                b(x+1,y-1),b(x+1,y),b(x+1,y+1)]%表示周围8个HSI

            e{x,y}=[c(x-1,y-1),c(x-1,y),c(x-1,y+1)

                c(x,y-1),1,c(x,y+1)

                c(x+1,y-1),c(x+1,y),c(x+1,y+1)]%表示周围8个生物量 

            while c(x,y)>0&&min(min(e{x,y}))<1&&min(min(d{x,y}))~=0&&c(x,y)~=0%如果当前位置(x,y)生物量大于0,并且

                %该位置周围8个网格生物量有小于环境容纳量,

                %并且,周围8个网格最小适宜度值不等于0

                %并且,当前位置生物量不等于0的情况

                [m,n]=find(d{x,y}==max(max(d{x,y})))%获取周围8个网格最大的HSI,确定迁移方向

                if isequal([m,n],[x,y])%如果目标单元是当前位置,即m,n和x,y相等

                    c(m,n)=c(x,y)%那么生物量不迁移

                    set(imh,'cdata',cat(3,c,zeros(z),zeros(z)))

                    break

                else

                    if c(m,n)<1%判定目标单元生物量是否饱和,若不饱和

                        c(m,n)=c(m,n)+c(x,y)%目标单元生物量等于已有+迁移的(x,y)的生物量

                        if c(m,n)>1

                            c(m,n)=1

                        end

                        c(x,y)=1-c(m,n)

                        if c(x,y)>=0

                            c(x,y)=0%迁移过后命令该点生物量等于零

                            set(imh,'cdata',cat(3,c,zeros(z),zeros(z)))

                            break 

                        else 

                            c(x,y)=c(m,n)-1

                        end

                    else

                        d{x,y}(m,n)=0%若饱和了,重新选择方向,命令目标单元HSI=0.重新选择方向

                    end

                end

            end

              % pause(0.1)

        end

    end

    set(imh,'cdata',cat(3,c,zeros(z),zeros(z)))

    pause(0.1)

end

i

这样修改之后,在我的电脑上运行至需要大约1.3秒。如果再把最后的一个pause删掉,则仅需大约0.3秒。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12098853.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-21
下一篇 2023-05-21

发表评论

登录后才能评论

评论列表(0条)

保存