RでOSMデータの道路を使用するにはどうすればよいですか？

道路を使用してGPS位置を比較し、データにエラーがないことを確認する必要があります。

ローマ市の情報があるサイトからmap.osmをダウンロードし、Rの空間線に変換しました。

src <- osmsource_file(file = "rome.osm")
bb <- center_bbox(41.9, 12.3, 1000, 1000)
rome <- get_osm(bb, src)
ways <- find(rome, way(tags(k == "highway")))
ways <- find_down(rome, way(ways))
ways <- subset(rome, ids = ways)
hw_lines <- as_sp(ways, "lines")  

したがって、空間線オブジェクトでdistm関数を使用しようとしましたが、空間オブジェクトを使用できない（適切な形式ではない）と非難されています。

OSMを使用して、RのGPSデータと比較できる道路のみの情報を取得する別の方法はありますか？

osmarパッケージを使用して、ローマ市からデータセットをダウンロードしました。その後、クエリに従って目的の高速道路を取得し、ローマの境界ボックスで取得したデータ内にランダムなSpatialPointsオブジェクトを作成しました。パッケージの関数を使用して、点と線の間の距離を測定dist2lineしましたgeosphere。

以下のコードを試してください：

# Load libraries
library('osmar')
library('geosphere')

# Define the spatial extend of the OSM data we want to retrieve
rome.box <- center_bbox(center_lon = 12.5450, center_lat = 41.8992, width =  2000, height = 2000)

# Download all osm data inside this area
api <- osmsource_api()
rome <- get_osm(rome.box, source = api)

# General plot
plot(rome)

# Find highways
ways <- find(rome, way(tags(k == "highway")))
ways <- find_down(rome, way(ways))
ways <- subset(rome, ids = ways)

# SpatialLinesDataFrame object
hw_lines <- as_sp(ways, "lines")  

# Plot
spplot(hw_lines, zcol = "uid")

# Interactive view
mapview::mapview(hw_lines) 

# Make a random points dataset (like GPS)
gpsPoints <- spsample(x = hw_lines, n = 100, type = "random")

# Plot points
plot(hw_lines, xlab = "Lon", ylab = "Lat")
plot(gpsPoints, add = TRUE, pch = 19, col = "red")
box()

# Distances between Higways and random points
distances <- dist2Line(p = gpsPoints, line = hw_lines)