1：创建后修改HTML文件

Question

我正在根据R中的ggplot构建一个Plotly图。我想增加悬停框中文本的大小。假设我有一个像这样的散点图：

library(plotly)
library(ggplot2)

d <- data.frame(a = sample(1:50, 30, T), 
                b = sample(1:50, 30, T), 
                col = factor(sample(1:3, 30, T)))

gg <- ggplot() + geom_point(aes(x = a, y = b, color = col), data = d)

p <– plotly_build(gg)
p

有没有办法改变悬停文字的大小？

Answer 1

目前似乎没有内置的方法来传递额外的属性来直接通过plotly定义悬停外观（参见github issue #102）。但是，在问题描述中，您会看到用于悬停文本的类的名称，即.hovertext。最简单的解决方案是将您作为HTML文件保存，并在HTML的<head>部分手动添加下面的CSS。如果您想要更改图例文本的大小，请保留.legendtext行，如果不删除它们。

<style type="text/css">
.hovertext text {
    font-size: 100px !important;
}
.legendtext {
    font-size: 30px !important;
}
</style>

如果你想用R注入CSS而不是手工操作，你有几个选择。

# the CSS we want to inject
css <- '
<style type="text/css">
.hovertext text {
    font-size: 100px !important;
}
.legendtext {
    font-size: 30px !important;
}
</style>'

library(plotly)
library(htmltools)
library(htmlwidgets)

1：创建后修改HTML文件

x <- as.widget(p)                                 # convert to htmlwidget object 
saveWidget(x, file="test_edited_1.html")          # and save to file
l <- readLines("test_edited_1.html")              # read file
h <- paste(l, collapse= " ")               
hh <- strsplit(h, "<head>")[[1]]                  # split where head appears
h.new <- paste(hh[1], css, hh[-1], collapse=" ")  # insert CSS
writeLines(h.new, "test_edited_1.html")           # write back to file

2：修改创建HTML文件的对象

x <- as.widget(p)                                 # convert to htmlwidget object 
# add a the code directly into <head> using `htmltools::htmlDependency`
x$dependencies <- list(
    htmlDependency(
        name = "custom",
        version="1",
        src="",
        head=css)  
    )
saveWidget(x, file="test_edited_2.html")

虽然第二个有效，但我不确定它是否正确使用htmlDependency。

结果

Answer 2

最近有一个update用于改变悬停文本的各种特征。这是R中的一个例子：

plot_ly(x=c(1:42),
        y=c(1:42),
        text=c(1:42),
      type="bar")%>%
  layout(
    title = paste("Top 42"),
    hoverlabel = list(font=list(size=10))
  )

还可以选择更改字体颜色，bgcolor等。

在Plotly中更改悬停文本的大小

2 个答案:

1：创建后修改HTML文件

2：修改创建HTML文件的对象

结果