Альфа-радиус, задающий критический переход в форме
a = criticalAlpha(shp,type)type как 'all-points' возвращает самый маленький альфа-радиус, производящий альфа-форму, которая заключает все точки. Определение type как 'one-region' возвращает самый маленький альфа-радиус, производящий альфа-форму, которая заключает все точки и имеет только одну область.
Создайте и постройте набор 2D точек.
th = (pi/12:pi/12:2*pi)'; x1 = [reshape(cos(th)*(1:5), numel(cos(th)*(1:5)),1); 0]; y1 = [reshape(sin(th)*(1:5), numel(sin(th)*(1:5)),1); 0]; x = [x1; x1+15;]; y = [y1; y1]; plot(x,y,'.') axis equal
Создайте альфа-форму с помощью альфа-радиуса по умолчанию.
shp = alphaShape(x,y);
Вычислите самый маленький альфа-радиус, который производит альфа-форму, заключающую все точки, и постройте соответствующую альфа-форму.
pc = criticalAlpha(shp,'all-points');
shp.Alpha = pc;
plot(shp)
Вычислите самый маленький альфа-радиус, который производит альфа-форму, заключающую все точки и имеющую только одну область.
shp = alphaShape(x,y);
pc = criticalAlpha(shp,'one-region');
shp.Alpha = pc;
plot(shp)