R語(yǔ)言geoviz包，mapbox_dem#從“mapbox”獲取數(shù)字高程模型（DEM）數(shù)據(jù)
image.png
# Tue Mar 16 13:39:14 2021 -
# 字符編碼：UTF-8
# R 版本：R x64 4.0.4 for window 10
# cgh163email@163.com
# 個(gè)人筆記不負(fù)責(zé)任，拎了個(gè)梨??
.rs.restartR()
require(geoviz)
rm(list = ls());gc()
?mapbox_dem#從“mapbox”獲取數(shù)字高程模型（DEM）數(shù)據(jù)
lat = 54.4502651
long = -3.1767946
square_km = 20
dem <- mapbox_dem(lat, long, square_km, api_key = my_mapbox_key)
require(terra)
plot(dem)
# Tue Mar 16 13:41:05 2021 --end
