George MacKerron ha escrito un función simple de vecino más próximo que me ha resultado bastante útil. Esta función devuelve el ID del vecino más cercano a una característica dada:
create or replace function
nn(nearTo geometry
, initialDistance real
, distanceMultiplier real
, maxPower integer
, nearThings text
, nearThingsIdField text
, nearThingsGeometryField text)
returns integer as $$
declare
sql text;
result integer;
begin
sql := ' select ' || quote_ident(nearThingsIdField)
|| ' from ' || quote_ident(nearThings)
|| ' where st_dwithin($1, '
|| quote_ident(nearThingsGeometryField) || ', $2 * ($3 ^ $4))'
|| ' order by st_distance($1, ' || quote_ident(nearThingsGeometryField) || ')'
|| ' limit 1';
for i in 0..maxPower loop
execute sql into result using nearTo -- $1
, initialDistance -- $2
, distanceMultiplier -- $3
, i; -- $4
if result is not null then return result; end if;
end loop;
return null;
end
$$ language 'plpgsql' stable;
Ejemplo de uso:
SELECT id, nn(pt_geom,0.00001,2,100,'nw_node','node_id','node_geom') FROM my_point_table;
... selecciona el nodo más cercano en la tabla nw_node para cada entrada en my_point_table.
También hay un función más genérica en el sitio del SIG de Boston .