r - 在 R 中使用 Open Street Map 和 get_osm {osmar}

Question

我想附加一组相关的方式并给出一个地区的边界。我尝试了以下但卡住了:

require(osmar)
require(XML)

# a set of open street map ways (lines) related as given by a relation..
# (if connected these ways represent the boundary of a political 
#  district in Tyrol/Austria)
myxml <- xmlParse("http://api.openstreetmap.org/api/0.6/relation/85647")

# extracting way ids at the according xml-nodes:
els <- getNodeSet(myxml, "//member[@ref]")
ways <- as.numeric(sapply(els, function(el) xmlGetAttr(el, "ref")))

# now I try to get one of those ways as an osmar-obj and plot it,
# which throws an error:
plot_ways(get_osm(way(ways[1])))

显然缺少一个边界框，但我不知道如何将它分配给这类对象。如果我解决了这个问题，我想用线/路制作一个多边形。

Answer 1

包的作者非常友好地提供了缺少当前文档的信息:参数 get_osm(.., all = T) 只是丢失了...... all = T 所有相关元素都被检索。

要获得我想要的地区边界，请应用以下代码:

District_Boundary <- get_osm(relation(85647), all = T)