我有一个绘图直方图,其中 x 轴是对数变形的。我正在尝试使直方图工具提示显示原始值而不是 log10 转换值。 我指的是这个例子。覆盖文本属性。
下面是我的代码。 但是,我的工具提示没有显示任何内容。 有谁知道在这种情况下如何修改文本属性?
g=iris %>%
#select(Petal.Length) %>%
ggplot(aes(x=Petal.Length))+
geom_histogram()+
scale_x_log10()
gg <- ggplotly(g)
gg$x$data[[1]]$text = paste(x,y)
gg
定义要在aes()
中显示的内容,然后在ggplotly
中调用它。
g=iris %>%
ggplot(aes(x=Petal.Length, text=paste("X:",iris$Petal.Length) )) +
geom_histogram()+
scale_x_log10()
gg <- ggplotly(g, tooltip=c("text"))
gg