Question

我正在使用openmap()中的OpenStreetMap函数从OpenCycleMap中下拉一些图块。直到最近，当瓷砖开始具有“需要API密钥”的水印时，这条线已经工作了

map = openmap(map_extent$upperLeft, map_extent$lowerRight,zoom=map_extent$zoom, minNumTiles=9,type='OpenCycleMap',mergeTiles = T)

我已经完成了获取API密钥的过程，我只是不确定如何实际格式化type参数以成功使用API密钥。

包文档显示了这个例子：

Some maps from custom urls:
apiKey <- paste0("?access_token=",
"pk.eyJ1IjoidGhlZmVsbCIsImEiOiJjaXN1anNwODEwMWlrMnRvZHBhamRrZjlqIn0.Gf8qLSpZ6yo5yfQhEutFfQ")
baseUrl <- "https://api.mapbox.com/styles/v1/mapbox/satellite-streets-v9/tiles/256/{z}/{x}/{y}"
map <- openmap(c(43.46886761482925,119.94873046875),
c(33.22949814144951,133.9892578125),
minNumTiles=4,
type=paste0(baseUrl,apiKey))

我已经使用了

baseUrl<-"https://{s}.tile.thunderforest.com/cycle/{z}/{x}/{y}.png?apikey=[my api key]"
map = openmap(map_extent$upperLeft, map_extent$lowerRight,zoom=map_extent$zoom, minNumTiles=9,type=baseUrl,mergeTiles = T)

但没有成功：我得到了

渗透性错误（x %% nX，y，缩放，类型）：无法获得瓷砖：2102 14443 15

我尝试了多个缩放级别试图获得不同的图块但没有成功，并检查了OpenCycleMap网站以确认它仍在运行，我只是不确定下一步要去哪里

Answer 1

我自己没有使用过这个函数，但是从查看你的帖子我认为错误可能与url的{s} -part有关。这必须替换为a，b，c或完全删除，以使请求起作用。

我的猜测是openmap只替换x / y / z但不替换s，因此请求无效。尝试将其更改为：

baseUrl<-"https://tile.thunderforest.com/cycle/{z}/{x}/{y}.png?apikey=[my api key]"

如果可行，您可以使用它或通过/ b / c实现自己的骑行以获得更好的性能。

如何在OpenStreetMap R包中使用OpenCycleMap API密钥？

1 个答案: