ツールチップはggplotly

Question

私はserver.Rに次のコードを持って回帰直線を削除しますグラフ。両方の事を一緒にするための解決策はありますか？

With tooltip

Without tooltip in ggplotly() and text in aes()

Answer 1

美的groupを必要とtext美的。
この例を考慮してみましょう：この場合

art.data <- data.frame(year=1430:1490, y=rnorm(61), 
      artist=sample(LETTERS,61, replace=T), art=sample(letters,61, replace=T)) 
col.str <- 2 

library(ggplot2) 
ggplot(art.data, aes(x = year, y = art.data[[col.str]], 
        text=paste0(artist, "<br>", art))) + 
    geom_point(size = 1) + 
    stat_smooth(method = loess, se = FALSE) + 
    xlab("Year") 

黄土ラインをグラフ上にプロットされていません。ggplot美学にgroup=1を追加

は、問題を解決：

p <- ggplot(art.data, aes(x = year, y = art.data[[col.str]], 
        text=paste0(artist, "<br>", art), group=1)) + 
    geom_point(size = 1) + 
    stat_smooth(method = loess, se = FALSE) + 
    xlab("Year") 
p 

とggplotly今うまく動作：

library(plotly) 
ggplotly(p, tooltip="text")