在R中组合点形状文件和道路形状文件

我想知道如何在R软件中组合两个形状文件，一个是点形状文件，另一个是道路形状文件。在附件中，我留下了一张图片，是我将Arcgis软件中的两个形状文件组合在一起制作的

对于测试，可以从以下网站下载两个ShapeFile：

非常感谢

---

如果你只是想可视化数据，那么这就是你可以做到的。请注意，道路和点形状文件似乎没有相同的投影。ShapeFile只能保存一种形状类型（直线、点、多边形等），因此无法真正组合它们

library(sf)

roads <- st_read('Roads/Roads.shp')
pts <- st_read('Points/Points.shp') %>% 
  st_transform(crs=st_crs(roads))


plot(st_geometry(roads))
plot(st_geometry(pts), add = T, col = 'red', pch = 20)

库（sf）
谢谢你的回答。我不明白你说他们看起来不在同一个投影中？？还有一件事，我能找出一个点和另一个点之间的距离并在地图上绘图吗？再次感谢您每个shapefile都有一个投影，用于指定它在垂直和水平方向上相对于基准面的空间位置。对于您的形状文件，如果我不使用
st_transform（）
转换为相同的crs，则
st_crs（道路）==st_crs（pts）
显示
FALSE
表示投影不相同。您还可以使用
st_distance（pts，pts）
从每个点获取每个点的距离矩阵。感谢您的回答，我问了一个与您所做代码相关的问题。我想知道从一点到另一点，例如，第4点和第10点。问题如下：你好，80岁，你对这个问题有什么想法吗