24小时热门版块排行榜    

查看: 2441  |  回复: 1

天微凉61

铁虫 (初入文坛)

[求助] matlab求函数所有极小值点

function prl()             %考虑第二种情况widely spaced islands
a=sort(80*rand(1,5));    %生成一组随机数然后从小到大排序
v(1)=a(1)+0.5*(a(2)-a(1)); %由Voronoi polygon算第一个island的体积
for i=2:4,
v(i)=(a(i+1)-a(i-1))*0.5;  %由Voronoi polygon算2到n-1个位置体积
end
v(5)=80-a(5)+0.5*(a(5)-a(4)); %最后一个island的体积
y=[zeros(1,length(a));v];
subplot(2,1,1);
plot([a;a],y,'k');
axis([0,80,0,100]);
title('layer 1');
syms x
f=((x^2+1)^(-3/2))*(1-3/(x^2+1));
for i=1:5,
   f=f+(((x-a(i))^2+1)^(-3/2))*(1-3/((x-a(i))^2+1)); %由张力公式叠加算第二层的岛的位置
end
h=diff(f,x,1);  %对总张力公式求一阶导
g=diff(f,x,2);  %求二阶导
h=inline(vectorize(f),'x');
options=optimset('Display','off');
k=1
q=zeros(1,80);
for j=0:300   
    q(k)=fzero(h,j,options); %找出一阶导数的零点
k=k+1;
end
p=zeros(1,80);
p(1)=q(1);
n=1;
for m=1:k
   % if q(m)~=p(n)
        if g(q(m))>0    %判断二阶导数是否大于零
             n=n+1;
             p(n)=q(m); %得到极值点
        end
    %end
end
v=zeros(1,80);                    %求第二层体积
v(1)=p(1)+0.5*(p(2)-p(1));
for i=2:m-1,
    v(i)=(p(i+1)-p(i-1))*0.5;
end
v(length(p))=80-p(length(p))+0.5*(p(length(p))-p(length(p)-1));
subplot(2,1,2)
plot([p;p],[zeros(1,length(p));v],'k')
axis([0,80,0,100])
title('layer 2');
            请问哪错了,求二至n层核的位置及体积,核的位置为f极小值点,f为张力公式,根据核的位置叠加求极小值,极小值就是下一层核位置,最后根据泰森边形球体积,求大神指导,小弟感激不尽[ Last edited by 天微凉61 on 2013-4-29 at 10:47 ]
回复此楼
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

天微凉61

铁虫 (初入文坛)

2楼2013-05-19 12:35:13
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 天微凉61 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 hKe7U1kad5Sg 2026-10-31 4/200 2026-11-02 03:50 by xzcv0Tehd8lQ
[硕博家园] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 hKe7U1kad5Sg 2026-10-31 8/400 2026-11-02 03:24 by xzcv0Tehd8lQ
[基金申请] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +5 xvJS1BYDxvBS 2026-10-31 11/550 2026-11-02 03:13 by xzcv0Tehd8lQ
[基金申请] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 1uaZt2kAZj2S 2026-10-30 16/800 2026-11-02 02:58 by xzcv0Tehd8lQ
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 hKe7U1kad5Sg 2026-10-31 6/300 2026-11-01 22:27 by xzcv0Tehd8lQ
[博后之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 hKe7U1kad5Sg 2026-10-31 5/250 2026-11-01 22:24 by xzcv0Tehd8lQ
[考博] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 hKe7U1kad5Sg 2026-10-31 6/300 2026-11-01 22:11 by xzcv0Tehd8lQ
[基金申请] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 hKe7U1kad5Sg 2026-10-31 6/300 2026-11-01 22:11 by xzcv0Tehd8lQ
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 xvJS1BYDxvBS 2026-10-31 7/350 2026-11-01 22:05 by xzcv0Tehd8lQ
[考博] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 xvJS1BYDxvBS 2026-10-31 7/350 2026-11-01 22:01 by xzcv0Tehd8lQ
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 1uaZt2kAZj2S 2026-10-31 5/250 2026-11-01 21:45 by xzcv0Tehd8lQ
[考博] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 1uaZt2kAZj2S 2026-10-31 7/350 2026-11-01 21:45 by xzcv0Tehd8lQ
[教师之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +6 X5bHxOULxFqb 2026-10-30 16/800 2026-11-01 21:19 by xzcv0Tehd8lQ
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 hKe7U1kad5Sg 2026-10-31 5/250 2026-11-01 20:03 by xzcv0Tehd8lQ
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 hKe7U1kad5Sg 2026-10-31 6/300 2026-11-01 19:50 by xzcv0Tehd8lQ
[论文投稿] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 1uaZt2kAZj2S 2026-10-30 13/650 2026-11-01 16:45 by BCdvBAEpt3zm
[硕博家园] 越来越担心硕士毕业后没有竞争力了 +9 zuesli 2026-10-27 15/750 2026-11-01 12:59 by Equinoxhua
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 1uaZt2kAZj2S 2026-10-31 8/400 2026-11-01 12:38 by BCdvBAEpt3zm
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 1uaZt2kAZj2S 2026-10-30 17/850 2026-11-01 12:24 by BCdvBAEpt3zm
[硕博家园] 申博自荐 2篇一区TOP+1篇EI+2公开发明专利 2027博士申请 +3 小小阿光 2026-10-27 3/150 2026-10-29 23:56 by 起风了的快乐
信息提示
请填处理意见