计算最大、最小直径的质心polyshape (irregula rpolygon)从一个点集

                              pgon = nsidedpoly (4“半径”,0.5);%输入polyshape
                             
                              有趣= @(θ)feretDiam (pgon.Verticesθ);
                             
                              θ= linspace(π-π,1 e4);
                             
                              %最小直径
                             
                              [~,i0] = min(乐趣(θ));
                             
                              [thetamin, minDiam] = fminsearch (@ (t)乐趣(t)θ(钱数));
                             
                              minDiam
                             
                                minDiam = 0.7071

                              %最大直径
                             
                              [~,i0] = max(乐趣(θ));
                             
                              [thetamax, maxDiam] = fminsearch (@ (t)乐趣(t)θ(钱数));
                             
                              maxDiam = -maxDiam
                             
                                maxDiam = 1.0000

                              函数d = feretDiam (V,θ)
                             
                              [p = V * cos(θ);罪(θ)];
                             
                              d = max (p,[], 1)最小(p, [], 1);
                             
                              结束

14日的评论
显示13年长的评论隐藏13年长的评论

马特·J 2022年9月8日

另一种是画2盒,一个基于最小直径和一个基于马克斯。实现以下要求:

//www.tianjin-qmedu.com/matlabcentral/fileexchange/30892-analyze-n-dimensional-convex-polyhedra

关闭所有

pgon = nsidedpoly (4“半径”,0.5);%输入polyshape

有趣= @(θ)feretDiam (pgon.Verticesθ);

θ= linspace(π-π,1 e4);

%最小直径

[~,i0] = min(乐趣(θ));

[thetamin, minDiam] = fminsearch (@ (t)乐趣(t)θ(钱数));

%最大直径

[~,i0] = max(乐趣(θ));

[thetamax, maxDiam] = fminsearch (@ (t)乐趣(t)θ(钱数));

[~,pmin] =乐趣([thetamin thetamin +π/ 2]);

警告:Polyshape有重复的顶点,十字路口或其他不一致,可能会产生不准确的或意想不到的结果。输入数据创建一个定义良好的polyshape已经修改。

[~,pmax] =乐趣([thetamax thetamax +π/ 2]);

警告:Polyshape有重复的顶点,十字路口或其他不一致,可能会产生不准确的或意想不到的结果。输入数据创建一个定义良好的polyshape已经修改。

情节(pgon);持有在

args = {“FaceColor”,“没有”,“EdgeColor”,“r”,“线宽”3,“线型”,“——”};

情节(pmin, args {:});

情节(pmax args {:});

轴平等的

函数[d, pgon] = feretDiam (V,θ)

udir = [cos(θ);罪(θ)];

p = V * udir;

umax = max (p, [], 1);

umin =最小(p, [], 1);

d = umax-umin;

如果nargout > 1

一个= [udir '; -udir '];b = [umax '; -umin '];

pgon = convhull (polyshape (lcon2vert (A, b)));

结束

马特·J 2022年9月9日

你能请告诉我出了什么问题在这段代码中:

代码不包含行和买主计算thetamin thetamax。

登录置评。

类别

MATLAB 数学计算几何基本的多边形

找到更多的在基本的多边形在帮助中心和文件交换

s manbetx 845

MATLAB

释放

R2021b

社区寻宝

找到宝藏在MATLAB中央,发现社区如何帮助你!

开始狩猎!

计算最大、最小直径的质心polyshape (irregula rpolygon)从一个点集

1评论
显示没有隐藏没有

接受的答案

14日的评论
显示13年长的评论隐藏13年长的评论

更多的答案(0)

另请参阅

类别

标签

s manbetx 845

释放

社区寻宝

计算最大、最小直径的质心polyshape (irregula rpolygon)从一个点集

1评论 显示没有隐藏没有

接受的答案

14日的评论 显示13年长的评论隐藏13年长的评论

更多的答案(0)

另请参阅

类别

标签

s manbetx 845

释放

社区寻宝

1评论
显示没有隐藏没有

14日的评论
显示13年长的评论隐藏13年长的评论