几天来,基本图层图块“OSM”和“Stamen.TonerLite”(我已经使用了一年多作为我的地图的标准图块)没有正确显示 - 即不再可能在它们之间切换.
只要地图在 RStudio 和 RStudio Viewer 中显示,一切都可以完美运行。但是,一旦我在浏览器中打开 .Rmd 输出的相应 .html 文件(我尝试了 chrome、internet explorer、edge 和 firefox),就不可能在磁贴之间切换了。要么显示“OSM”,我不能切换到“Stamen.TonerLite”,反之亦然。
我尝试了不同的图层瓷砖或超过 2 层瓷砖,但结果相同。即使我切换到其他图层,也始终只有一层图块可见。
我的案例的可重现示例:
---
title: "stackoverflow"
author: " "
date: " "
output: html_document
---
```{r, echo = T}
library(leaflet)
m <- leaflet() %>%
addTiles(group = "OSM") %>%
addProviderTiles("Stamen.TonerLite") %>%
addLayersControl(baseGroups = c("OSM", "Stamen.TonerLite")) %>%
addCircleMarkers(lat = 47.4,
lng = 9.37,
radius = 10,
fillOpacity = 1.0)
m
```
Run Code Online (Sandbox Code Playgroud)
我有一个问题,在某些时间设置工作日的缩写数据.我需要的是缩写"周一,周二,周三,周四,周五,周六,周日".我使用的lubridate :: wday()函数给出了"Mon,Tue,Wed,Thu,Fri,Sat,Sun"的值.
对于"星期二"和"星期四"的日子来说,这是一个小小的差异.
x <- seq(Sys.Date() - 7, Sys.Date(), by = 1)
lubridate::wday(x, label = TRUE)
## [1] Thu Fri Sat Sun Mon Tue Wed Thu
Run Code Online (Sandbox Code Playgroud)
我还使用语言环境更改了语言设置,但这并没有成功,因为我不确定要设置的可能参数(可能的选择).
lubridate::wday(x, label = TRUE, locale = "French")
## [1] jeu\\. ven\\. sam\\. dim\\. lun\\. mar\\. mer\\. jeu\\.
lubridate::wday(x, label = TRUE, locale = "English")
## [1] Thu Fri Sat Sun Mon Tue Wed Thu
lubridate::wday(x, label = TRUE, locale = "English_Great Britain")
## [1] Thu Fri Sat Sun Mon Tue Wed Thu …Run Code Online (Sandbox Code Playgroud)