- 积分
- 3638
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-10-21
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2018-6-25 15:49:34
|
显示全部楼层
捋一遍:
1、读图:
world = FILEPATH('Day.jpg', SUBDIRECTORY=['examples','data'])
2、把图变形为经纬度坐标
arctic = IMAGE(world,MAP_PROJECTION='Stereographic',GRID_UNITS=2,$
LIMIT=[51,-161,78,-52],IMAGE_LOCATION=[-180,-90],$
IMAGE_DIMENSIONS=[360,180],/CURRENT,NAME='Arctic Research')
3、在图上加条线
polyline = POLYLINE([[-149.81,61.25],[-68.70,76.53]], $
/DATA, COLOR='red', NAME='Thule to Elmendorf', $
THICK=2, TARGET=arctic)
4、再加个多边形
x = [-119.017, -124.82, -129.22, -118.23, -113.03, -113.183]
y = [66.25, 64.65, 61.43, 62.3, 63.783, 65.11]
polygon = POLYGON(x, y, /DATA, COLOR='purple', $
FILL_COLOR='purple', FILL_TRANSPARENCY=0, $
NAME='Magnetic Anomaly', TARGET=arctic)
注意:在经纬度坐标的图上画图,用了target!
5、存为kml文件
arctic.SAVE, 'C:\Users\YGDY\Desktop\arctic_map.kml'
|
|