多边形边界上彼此距离相等的点（坐标） - Matlab

Question

我正在考虑以下问题的解决方案：如何在多边形边界（polyshape object.）上找到彼此距离相等的 X 点（坐标）。 我什至不知道如何处理它，所以欢迎任何想法如何去做？

代码：

clc;
clear all;
close all;
 
numOfSegments = 10; % just an example
polygon = polyshape([0 5 15 15 20 18 10 20 20],[1 5 10 10 10 15 10 25 35]);
plot(polygon)
P = perimeter(polygon);
SegemntP = P/numOfSegments;

Answer 1

0. 将 LengthToGo 设置为SegemntP
1. 在你的 polyshape 上选择一个起点
2. 将您的 LengthToGo 移向下一点
3. 如果你没有达到这一点，你已经找到了你的一点。 将此作为您的新起点并从 0 继续。
4. 如果您已到达此点，请将 LengthToGo 减少您的起点与您已到达的点的距离。 将您到达的点设置为新的起点。 继续 0

希望下面的代码解释：

clc;
clear all;
close all;
 
numOfSegments = 10; % just an example
polygon = polyshape([0 5 15 15 20 18 10 20 20],[1 5 10 10 10 15 10 25 35]);
% polygon = polyshape([0 20 20 0 0],[0 0 20 20 0]);
plot(polygon)
hold on;

P = perimeter(polygon);
SegemntP = P/numOfSegments;

% this is first point on the polygon
lastPoint = polygon.Vertices(1,:);
% container for points
points = lastPoint;

polyIdx = 1;
lenToGo = SegemntP;
plygonPoints = [polygon.Vertices;polygon.Vertices(1,:)];% add first point so polygon is closed
while(size(points,1)<numOfSegments)
    lenOnPolyline = norm(plygonPoints(polyIdx+1,:)-lastPoint);
    if lenOnPolyline > lenToGo
        % move on this line
        dir = plygonPoints(polyIdx+1,:)-lastPoint;
        dir = dir ./ norm(dir);
        lastPoint = dir*lenToGo+lastPoint;
        points = [points;lastPoint];
        lenToGo = SegemntP;
    else
        % go to next line segment
        lenToGo = lenToGo-lenOnPolyline;
        polyIdx = polyIdx +1;
        lastPoint = plygonPoints(polyIdx,:);
    end
end

plot(points(:,1),points(:,2),'b*')
axis equal

结果：