R 更改地图类型

我有代码在地图上显示点，如下所示：

m <- leaflet(mdt) %>% 
    addTiles('http://{s}.basemaps.cartocdn.com/dark_all/{z}/{x}/{y}.png', attribution='Map tiles by <a href="http://stamen.com">Stamen Design</a>, <a href="http://creativecommons.org/licenses/by/3.0">CC BY 3.0</a> &mdash; Map data &copy; <a href="http://www.openstreetmap.org copyright">OpenStreetMap</a>') m %>% 
    addCircles(~mdt$Pickup_longitude, ~mdt$Pickup_latitude, popup=mdt$Trip_type, weight = 3, radius=40,                   color="#ffa500", stroke = TRUE, fillOpacity = 0.8) %>% 
    addCircles(~mdt$Dropoff_longitude, ~mdt$Dropoff_latitude, popup=mdt$Trip_type, weight = 3, radius=40,                    color="#9dea3f", stroke = TRUE, fillOpacity = 0.8  ) %>% 
    addLegend("bottomright", colors= "#ffa500", labels="NYC'", title="Pickup & Drop off Locations")

m%
addTiles（'http://{s}.basemaps.cartocdn.com/dark_all/{z}/{x}/{y}.png'，attribute='Map tiles by，&mdash；Map data©；'）m%>%
添加圆（~mdt$picku经度，~mdt$picku纬度，popup=mdt$Trip\u类型，权重=3，半径=40，color=“#ffa500”，stroke=TRUE，fillOpacity=0.8）%>%
addCircles（~mdt$Dropoff_经度，~mdt$Dropoff_纬度，popup=mdt$Trip_类型，权重=3，半径=40，color=“#9dea3f”，stroke=TRUE，fillOpacity=0.8）%
addLegend（“右下角”，colors=“#ffa500”，labels=“NYC”，title=“上下车地点”）

我的地图是这样的：

如何更改地图类型，我希望使用颜色清晰的开放式街道地图，如下所示：

---

我只想更改地图的类型。最简单的方法是什么。

这是针对那些可能出现相同问题的人的答案

m <- leaflet(mdt) %>% addTiles(options = providerTileOptions(opacity = .5)) m %>% addCircles(~mdt$Pickup_longitude, ~mdt$Pickup_latitude, popup=mdt$Trip_type, weight = 3, radius=40, color="#8B008B", stroke = TRUE, fillOpacity = 0.8) %>% addCircles(~mdt$Dropoff_longitude, ~mdt$Dropoff_latitude, popup=mdt$Trip_type, weight = 3, radius=40, 
               color="#00FF00", stroke = TRUE, fillOpacity = 0.8  ) 

m%addTiles（options=providerTileOptions（opacity=.5））m%>%addCircles（~mdt$Pickup\u经度，~mdt$Pickup\u纬度，popup=mdt$Trip\u类型，权重=3，半径=40，color=“#8B08b”，stroke=TRUE，fillOpacity=0.8）%>%addCircles（~mdt$Dropoff\u经度，~mdt$Dropoff\u纬度，popup=mdt$Trip\u类型，权重=3，半径=40，
color=“#00FF00”，笔划=真，填充不透明度=0.8）