Значения Альфа, дающие различные альфа-формы
a = alphaSpectrum(shp)a находится в убывающем сортированном порядке. Каждый элемент в a представляет значение альфа-радиуса, которое приводит к определенной форме. Длина a равен количеству уникальных фигур. Значения альфа, которые находятся между значениями в a не создавать уникальные альфа-формы.
Создайте и постройте график набора 2-D точек.
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);
Найдите спектр критических альфа- значений, которые создают уникальные альфа-формы для облака точек.
alphaspec = alphaSpectrum(shp);
Постройте график четырех уникальных альфа-форм, сгенерированных альфа- значениями в спектре.
for k = 1:4 alpha = alphaspec(8*k-7); shp.Alpha = alpha; subplot(2,2,k) plot(shp) title("Alpha = "+alpha) end
