r - ggplotly如何更改工具提示和右侧的文本

Question

library("ggplot2")
draw_a_boxplot <- function(data,y,color){
  data$quality <- as.factor(data$quality)
  p <- ggplot(data,aes(data[,I(color)],data[,y]))+
    geom_boxplot(aes(colour=data[,color]))+
    geom_jitter(width = 0.2,aes(colour=data[,color]))+
    xlab(color) +
    ylab(y) +
    ggtitle(paste0("BoxPlot-Jitter-",color,"-",y))
  return(ggplotly(p,tooltip = c("y", "x", "colour")))
}
draw_a_boxplot(wines,"volatile.acidity","quality")

这是我绘制箱线图的代码，我可以创建箱线图，但我想更改工具提示文本和右侧的文本。如何使 ggpotly 使用 ggplot2 的工具提示

我附上数据集链接 Dataset

Answer 1

您正在寻找这样的东西吗？

您只需向 ggplot 调用发送短信，然后在 tooltip 参数中询问即可。

draw_a_boxplot <- function(data,y,color){
  data$quality <- as.factor(data$quality)
  p <- ggplot(data,aes(data[,I(color)],data[,y], text = paste("TextYouWant1:", data[,I(color)], "<br>", "TextYouWant2:", data[,y]), "<br>", "TextYouWant3:", data[,color]))+
    geom_boxplot(aes(colour=data[,color]))+
    geom_jitter(width = 0.2,aes(colour=data[,color]))+
    xlab(color) +
    ylab(y) +
    ggtitle(paste0("BoxPlot-Jitter-",color,"-",y))
  return(ggplotly(p,tooltip = c("text")))
}
draw_a_boxplot(wines,"volatile.acidity","quality")