显示地图闪亮

Question

我想生成闪亮的地图（附加），但是我无法从下面的代码中绘制地图。您可以看看并帮助我解决吗？可以从以下网站下载shapefile文件：https://github.com/ropensci/stplanr/releases/download/0.6.1/Example.zip

如果您尚未安装sfnetworks软件包，请访问以下网站：https://github.com/luukvdmeer/sfnetworks

非常感谢您！

The code is running fine, and even the build is running fine. I am only getting an error when trying to run test cases on this file.

Answer 1

 output$Map <- renderPlot({
    plot(net)
    plot(r, col = "blue", lwd = 5, add = TRUE)
    
    })