使用ggplotly时,将鼠标格式化为标签

Question

在使用ggplotly和鼠标悬停功能时,我正在努力处理文本格式化.

library(plotly)
df <- data.frame(a=letters, b=LETTERS, x=runif(26), y=runif(26))
g <- ggplot(df, aes(x,y)) + geom_point(aes(text=sprintf('letter: %s\nLetter: %s', a, b)))
g
(gg <- ggplotly(g))

我想在我的鼠标标签上有一些格式化的文本或至少一个换行符.有没有关于如何设计这个鼠标超过泡沫的好文档？

Answer 1

请参阅tooltipggplotly()的参数.例如,virginica在悬停时仅显示物种名称(例如右上角):

g <- ggplot(tail(iris), aes(Petal.Length, Sepal.Length, text=Species)) + geom_point()
ggplotly(g, tooltip="text")

其他例子:

ggplotly(g, tooltip="x")             # Petal.Length: 5.7
ggplotly(g, tooltip="Petal.Length")  # Petal.Length: 5.7
ggplotly(g, tooltip=c("x", "y"))

最后一个示例将显示两行工具提示

Petal.Length: 5.7
Sepal.Length: 6.7

Answer 2

plotly可以使用换行符HTML标记.您可以使用<br>标记获取换行后的内容:

g <- ggplot(df, aes(x,y)) + 
       geom_point(aes(text=sprintf("letter: %s<br>Letter: %s", a, b)))

(gg <- ggplotly(g))