Ищете Алгоритм для обнаружения кружения и начала и конца круга?

24

У меня есть много полетных данных от пилотов планеров в виде исправлений GPS с фиксированным интервалом. Я хотел бы проанализировать траекторию полета и определить начало и конец «кругового движения», которое совершит пилот планера, когда он обнаружит термики.

В идеале алгоритм должен дать мне начальную и конечную точку на линии, определяя один «круг». Эти точки могут быть равны одному из исправлений GPS и не должны быть интерполированы.

Я просто мог пройтись по траектории полета, проверить скорость поворота и иметь некоторые критерии, чтобы решить, кружит ли планер или нет.

Поскольку я использую PostgreSQL с расширением PostGIS, мне было любопытно, есть ли лучший подход к этой проблеме. У меня уже есть процедура для расчета угла двух отрезков:

CREATE OR REPLACE FUNCTION angle_between(
  _p1 GEOMETRY(PointZ,4326),
  _p2 GEOMETRY(PointZ,4326),
  _p3 GEOMETRY(PointZ,4326)
) RETURNS DECIMAL AS $$
DECLARE
  az1 FLOAT;
  az3 FLOAT;
BEGIN
  az1 = st_azimuth(_p2,_p1);
  az3 = st_azimuth(_p2,_p3);
IF az3 > az1 THEN
  RETURN (
      degrees(az3 - az1)::decimal - 180
  );
ELSE
  RETURN (
      degrees(az3 - az1)::decimal + 180
  );
END IF;
END;
$$ LANGUAGE plpgsql;

Должна быть возможность зацикливаться на всех отрезках и проверять, когда сумма углов больше 360 или меньше -360 градусов. Тогда я мог бы использовать st_centroid, чтобы обнаружить центр круга, если это необходимо.

Есть ли лучший подход?


По запросу я загрузил пример полета .

Образец траектории полета

pgross
источник
1
Оглядываясь вокруг, поднял Hough Circle Transform. Здесь есть похожая (хотя и с многоугольником) дискуссия пользователя postgis
Барретт
Спасибо вам обоим. Я посмотрю на преобразование Хафа. Обсуждение на osgeo.org предполагает, что я уже знаю, где начинается и заканчивается круг, если я правильно понял?
pgross
Вы видели это: gis.stackexchange.com/questions/37058
Девдатта Тенгше
@DevdattaTengshe Да, но все равно спасибо. Это был бы подход, при котором мне пришлось бы рассчитывать сплайны и кривизну извне, верно? Под внешним я подразумеваю не как процедуру или запрос непосредственно к базе данных. Поскольку рейсы не меняются, как только они будут в базе данных, это будет вариант.
pgross
Можете ли вы опубликовать пример данных в виде файла .sql?
dbaston

Ответы:

14

Я не мог перестать думать об этом ... Я смог придумать хранимую процедуру для подсчета циклов. Пример пути содержит 109 циклов!

Вот точки полета, показанные с центроидами петли красным: введите описание изображения здесь

По сути, он проходит через точки в том порядке, в котором они были захвачены, и строит линию, проходя через точки. Когда линия, которую мы строим, создает цикл (используя ST_BuildArea), тогда мы считаем цикл и снова начинаем строить линию с этой точки.

Эта функция возвращает набор записей каждого цикла, который содержит номер цикла, его геометрию, его начальную / конечную точку и его центроид (я также немного его очистил и сделал более подходящие имена переменных):

DROP FUNCTION test.find_loop_count(flightid int);

create function test.find_Loop_count(
    IN flightid      int,
    OUT loopnumber   int,
    OUT loopgeometry geometry,
    OUT loopstartend geometry,
    OUT loopcentroid geometry
    ) 
  RETURNS SETOF record AS
$BODY$

-- s schema 'test' must exist
-- a table 'points' of flight points must exist
--  we are going to iterate through the point path, building a line as we go
--   If the line creates a loop then we count a loop and start over building a new line
--     add the intersection point to the returning recordset
--     add the centroid of the loop to the resulting recordset
-- pass in the flight ID of the flight that you wish to count its loops for example:
--   SELECT * FROM find_loop_count(37);

DECLARE
    rPoint              RECORD;
    gSegment            geometry = NULL;
    gLastPoint          geometry = NULL;
    gLoopPolygon        geometry = NULL;
    gIntersectionPoint  geometry = NULL;
    gLoopCentroid       geometry = NULL;
    iLoops              integer := 0;
BEGIN
    -- for each line segment in Point Path
    FOR rPoint IN 
        WITH
            pts as (
                SELECT location as geom,datetime,row_number() OVER () as rnum 
                FROM test.points 
                WHERE flight_id=flightid
                ORDER BY 2) 
            SELECT ST_AsText(ST_MakeLine(ARRAY[a.geom, b.geom])) AS geom, a.rnum, b.rnum 
            FROM pts as a, pts as b 
            WHERE a.rnum = b.rnum-1 AND b.rnum > 1
        LOOP

        -- if this is the start of a new line then start the segment otherwise add the point to the segment
        if gSegment is null then
            gSegment=rPoint.geom;
        elseif rPoint.geom::geometry=gLastPoint::geometry then
        -- do not add this point to the segment because it is at the same location as the last point
        else
        -- add this point to the line
        gSegment=ST_Makeline(gSegment,rPoint.geom);
        end if;
        -- ST_BuildArea will return true if the line segment is noded and closed
        --  we must also flatten the line to 2D
        --  lets also make sure that there are more than three points in our line to define a loop
        gLoopPolygon=ST_BuildArea(ST_Node(ST_Force2D(gSegment)));
        if gLoopPolygon is not NULL and ST_Numpoints(gSegment) > 3 then
        -- we found a loop
        iLoops:=iLoops+1;

        -- get the intersection point (start/end)
        gIntersectionPoint=ST_Intersection(gSegment::geometry,rPoint.geom::geometry);

        -- get the centroid of the loop
        gLoopCentroid=ST_Centroid(gLoopPolygon);

        -- start building a new line
        gSegment=null;

        LOOPNUMBER   := iLoops;
        LOOPGEOMETRY := gLoopPolygon;
        LOOPSTARTEND := gIntersectionPoint;
        LOOPCENTROID := gLoopCentroid;

        RETURN NEXT;
        end if;
        -- keep track of last segment
        gLastPoint=rPoint.geom;
    END LOOP;
    RAISE NOTICE 'Total loop count is %.', iLoops;
END;
$BODY$
  LANGUAGE plpgsql STABLE
  COST 100
  ROWS 1000;

Это простая функция, которая возвращает только количество циклов:

DROP FUNCTION test.find_loop_count(flightid int);

create function test.find_Loop_count(flightid int) RETURNS integer AS $$
-- s schema 'test' must exist
-- a table 'points' of flight points must exist
--  we are going to iterate through the line path, building the line as we go
--   If the line creates a loop then we count a loop and start over building a new line
-- pass in the flight ID of the flight that you wish to count its loops for example:
--   SELECT find_loop_count(37);

DECLARE
    segment RECORD;
    s geometry = NULL;
    lastS geometry = NULL;
    b geometry = NULL;
    loops integer := 1;
BEGIN
    -- for each line segment is Point Path
    FOR segment IN 
        WITH
            pts as (
                SELECT location as geom,datetime,row_number() OVER () as rnum 
                FROM test.points 
                WHERE flight_id=flightid
                ORDER BY 2) 
            SELECT ST_AsText(ST_MakeLine(ARRAY[a.geom, b.geom])) AS geom, a.rnum, b.rnum 
            FROM pts as a, pts as b 
            WHERE a.rnum = b.rnum-1 AND b.rnum > 1
        LOOP

        -- if this is the start of a new line then make s be the segment otherwise add the segment to s
        if s is null then
            s=segment.geom;
        elseif segment.geom::geometry=lastS::geometry then
        else
            s=ST_Makeline(s,segment.geom);
        end if;
        -- ST_BuildArea will return true if the line segment is noded and closed
        --  we must also flatten the line to 2D
        b=ST_BuildArea(st_node(ST_Force2D(s)));
        if b is not NULL and st_numpoints(s) > 3 then
            RAISE NOTICE 's: %', s;
            RAISE NOTICE 'vvvvv %',st_numpoints(s);
            RAISE NOTICE 'I found a loop! Loop count is now %', loops;
            RAISE NOTICE '^^^^^';
            s=null;
            loops:=loops +1;
        end if;
        lastS=segment.geom;
    END LOOP;
    RAISE NOTICE 'Total loop count is %.', loops-1;
    RETURN loops-1;
END;
$$ LANGUAGE plpgsql;

kttii
источник
Это выглядит очень многообещающе. Спасибо большое. Мне нужно его улучшить, так как меня интересует не количество кругов, а начальная / конечная точки. Но это должно быть легко возможно вернуть, я думаю.
pgross
Это звучит довольно умно. Как она справляется с ситуацией, когда один цикл пересекает другой цикл? Или вы пропускаете начальные точки, как только вы находите петлю?
Питер Хорсбёлл Меллер
@ PeterHorsbøllMøller Анализирует, когда линия делает цикл (ST_BuildArea будет возвращать true только тогда, когда линия создает замкнутую область), а не ищет пересечения.
kttii
@pgross ой правда! Я немного отвлекся и забыл о начальных / конечных точках, но да, это достаточно легкое определение, когда петли различаются.
kttii
@pgross Мне кажется, что вы, вероятно, получите более разумные местоположения термиков, располагая ST_Centroid каждого цикла, а не начальный / конец каждого цикла. Что вы думаете? Конечно, функция может предоставить все три статистики.
kttii
3

Я заметил, что у файла gpx есть метка времени, которую можно использовать. Возможно, следующий подход мог бы работать.

Make a linesegement with Vi,Vi+1
Make it Polyline
Proceed to Vi+2,Vi+3 check intersection with Polyline
  if it intersects 
      find the point of intersection-Designate this as start/end point of the loop
      Make this intersection point as Vi and Vi+1 would next gpx point per time sequence  
  if the linesegement does not intersect with polyyline then  increment 'i' 
addcolor
источник
Мне было трудно использовать ST_Intersects из-за перекрывающихся кругов, которые привели меня к использованию ST_BuildArea.
kttii
Я дал вам награду, так как ваш ответ, как правило, на том же пути.
kttii