在使用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))

我想有一些格式化的文本或至少在我的鼠标标签换行.关于如何设计鼠标在泡泡上的东西,有好的文档吗?

推荐答案

plotly可以使用换行HTML标记.在使用<br>标签换行后,你可以得到你想要的:

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

(gg <- ggplotly(g))

R相关问答推荐

geom_raster不适用于x比例中超过2,15的值

卸载安装了BRM的模型发出的警告

根据shiny 应用程序中的数字输入更改图标 colored颜色

如何计算多个日期是否在一个日期范围内

一小时满足条件的日期的 Select

多个模拟序列间的一种预测回归关系

如何用书面利率绘制geom_bar图

有没有办法使用ggText,<;Sub>;&;<;sup>;将上标和下标添加到同一元素?

如何在R中平滑地绘制线图(不拟合)?

使用RSelenium在R中抓取Reddit时捕获多个标签

为什么这个表格格罗布不打印?

如何将这个小列表转换为数据帧?

将列表中的字符串粘贴到R中for循环内的dplyr筛选器中

循环遍历多个变量,并将每个变量插入函数R

根据r中每行中的日期序列,使用列名序列创建新列

Conditional documentr::R中数据帧的summarize()

如果满足条件,则替换列的前一个值和后续值

roxygen2正在处理太多的文件

根据用户输入更改标记大小和 colored颜色 (R)

动态统计函数在ShinyApp内部更改