selectmapd.m

计量工具箱

function [out,vectx,vecty]=selectmapd(lat,long,obs,x,y,method,Hdem,oui)
% PURPOSE: This function selects points on a map (demo version)
%------------------------------------------------------------------------
% USAGE: [out,vectx,vecty]=selectmapd(long,lat,obs,x,y,index,method)
%   where :
%           long = n x 1 vector of coordinates on the second axis
%            lat = n x 1 vector of coordinates on the first axis
%           obs = n x 1 0-1 variable: current selection. Selected spatial units are marked with a 1
%           x = first coordinate of the clicked point
%           y = second coordinate of the clicked point
%           method = tells how to select points:
%                       *   method = 'point' : single point selection
%                       *   method = 'poly' : selects points inside a polygon
%------------------------------------------------------------------------
% OUTPUTS: out = (n x 1) 0-1 variable: selected spatial units are marked with a 1
%          vectx = vector of the first coordinates of the polygon (vectx=[] if method=1)
%          vecty = vector of the second coordinates of the polygon (vecty=[] if method=1) 
%------------------------------------------------------------------------
% Christine Thomas-Agnan, Anne Ruiz-Gazen, Julien Moutel
% June 2003
% Universit