Plotly和ggplot2

Question

我在Plotly图书馆工作。下面您可以看到生成树地图的代码。

library(plotly)
library(dplyr)

dt=data.frame(
          types= rep("stories",10),
          kind= c('kind_1','kind_2','kind_3','kind_1','kind_2','kind_3','kind_1','kind_2','kind_3','kind_1'),
          values=seq(1:10))

Treemap<-plot_ly(data = dt,
                 type= "treemap",
                 values= ~values,
                 labels= ~kind,
                 parents=  ~types,
                 domain= list(column=0),
                 name = " ",
                 textinfo="label+value+percent parent")%>%
    layout(title="Treemap")

Treemap

所以上面的代码给我们展示了一个标题的树状图。与ggplot2库中的图表相比，此标题具有不同的字体。在下面，您可以看到ggplot2中一个带有标题的图表示例

library(ggplot2)

qplot(values, kind, data = dt)+ ggtitle("Treemap")

那么，谁能帮我用更改树状图中的标题，并将标题与ggplot2中的标题字体相同？

Answer 1

所以ggplot的默认字体是Arial/Helvetica。您可以通过在plotly中添加font来更改layout中的字体。您可以使用以下代码：

library(plotly)
t <- list(
  family = "Arial")

Treemap<-plot_ly(data = dt,
                 type= "treemap",
                 values= ~values,
                 labels= ~kind,
                 parents=  ~types,
                 domain= list(column=0),
                 name = " ",
                 textinfo="label+value+percent parent")%>%
  layout(title="Treemap", font = t)

Treemap

输出：

​

​

如果可用，可以将font更改为任何您想要的内容。

注释:在标题中添加粗体

要添加粗体标题，可以使用以下html标记：

Treemap<-plot_ly(data = dt,
                 type= "treemap",
                 values= ~values,
                 labels= ~kind,
                 parents=  ~types,
                 domain= list(column=0),
                 name = " ",
                 textinfo="label+value+percent parent")%>%
  layout(title="<b>Treemap</b>", font = t)

Treemap

输出：

​

​