我用下面的代码使用girafe函数创建了一个交互式ggplot
A<-ggplot(data)+geom_sf_interactive(aes(fill=Pop_Rate,tooltip = sprintf("%s<br/>%s", Region,Pop_Rate)))
girafe(code, ggobj = A,
options = list(opts_tooltip(use_fill = TRUE),
opts_zoom(min = 1, max = 5),opts_toolbar(saveaspng = FALSE)))
当我将这段代码添加到R标记柔性版时,输出包括来自r控制台的输出和映射
Justice\Documents\R\Maps\Shapes\Counties_and_Unitary_Authorities__April_2019__Boundaries_EW_BUC.shp‘使用驱动程序“Counties_and_Unitary_Authorities__April_2019__Boundaries_EW_BUC' from data source
”的简单特征集合,具有173个特性和10个字段的几何类型:
边界框: xmin: 86999.8 ymin: 7054.1 xmax: 655644.8 ymax: 657548.1投影字符: OSGB 1936 /英国国家电网
我尝试了results=FALSE,但这也隐藏了我的图表的“隐藏”。当前使用以下内容
```{r, echo=FALSE, message=FALSE, warning=FALSE}
发布于 2022-01-29 22:21:42
我没有得到与您相同的输出,因为我在编码时没有像您那样得到任何输出。尽管如此,我没有您的数据,也没有您在YAML或块选项中声明的选项。
我很好奇code
在您的代码中做了什么。据我所知,您有code
或ggobj
,而不是两者都有。
```{r giraffeMe,echo=F}
图书馆(Ggplot2)
图书馆(图)
nc <- sf::st_read(system.file("shape/nc.shp",package = "sf"),宁静=真)
gg <- ggplot(nc) +
Geom_sf_interactive(aes(填充=区域)
tooltip = NAME,
data_id = NAME))
吉拉菲
options = list(opts_tooltip(use_fill = TRUE),
opts_toolbar(saveaspng = FALSE)))
这是在仪表板中呈现的地图。我徘徊是为了让你看到工具提示。
https://stackoverflow.com/questions/70881708
复制相似问题