改变工具提示中的数值在阴谋

Question

library(ggplot2) 
library(plotly) 
dataset = data.frame(x = c(1,10, 100, 1000), 
       y = c(1000, 100, 10, 1)) 
p = ggplot(data = dataset, aes(x = x, y = y)) + geom_point() + geom_line() + 
scale_x_log10() + scale_y_log10() 
ggplotly(p) 

有了上面的代码，你可以有工具提示的情节图。 x和y轴显示原始数据。但工具提示中的值显示为（0,3），（1,2），（2,2），（3,0）。我在工具提示中需要的是（1，1000），（10，100），（100，10），（1000，1）。

有没有办法做到这一点？

Answer 1

Plotly不会将输入值作为数字，而是会覆盖轴标签。

> gp$x$data[[1]]$x 
[1] 0 1 2 3 
> gp$x$data[[1]]$y 
[1] 3 2 1 0 

更改x和y值会导致更多工作，因为工具提示显示的文本与这些值无关。在这个例子中最简单的解决方案是覆盖text属性。

library(ggplot2) 
library(plotly) 
x <- c(1,10, 100, 1000) 
y <- c(1000, 100, 10, 1) 
dataset = data.frame(x = x, 
        y = y) 
p = ggplot(data = dataset, aes(x = x, y = y)) + geom_point() + geom_line() + 
    scale_x_log10() + scale_y_log10() 

gp <- ggplotly(p) 
gp$x$data[[1]]$text = paste(x, y, sep='<br />') 
gp