Comment puis-je afficher la valeur de y sur info-bulle tandis que planent dans ggplot2

Je veux le montrer la valeur de y quand je tiens ma souris sur un point du graphique. Le code de mon intrigue ressemble à ceci:

output$graph <- renderPlot({
  p1 <- ggplot(data, aes(x= date)) + 
  geom_line(aes(y=Height, colour = "Height"), size=1) + 
  geom_point(aes(y=Height, colour = "Height", text = paste("Weight/Height:", Height)))
  plot(p1)
})

J'ai fait quelques recherches et j'ai pensé que le text = paste("Weight/Height:", Height) partie dans aes permettrait de faire en sorte que le texte apparaît. Malheureusement, rien ne s'affiche. Personne ne sait ce que j'ai fait de mal?

OriginalL'auteur Hav11 | 2016-08-12