R Shiny中的ggplot标签

Question

尝试做一件简单的事情并遇到意想不到的麻烦。我正在整理一个RShiny应用程序，并想在我的ggplot图中标记点。

我的代码如下。我不明白为什么我不能传递变量花来获得图表中的点标签。为了比较，当我删除点标签上的所有尝试时，注释行完全正常（这表明它不是来自其他函数的变量passthroughs的问题等）。

此外，直接将rownames（）放入aes也不起作用。

感谢您的帮助。

output$graph=renderPlot({
pairs2=pctchg()
pairs3=as.data.frame(pairs2)

rownames(pairs3)=input$vector[]
flowers=rownames(pairs3)

#basegraph=ggplot(pairs3,aes(x,y))
basegraph=ggplot(pairs3,aes(x,y,label=flowers))

globalvars=basegraph + geom_point() + geom_smooth(method = 'lm') + geom_text(aes(label=flowers)) 

#globalvars=ggplot(pairs3,aes(x,y)) + geom_point() + geom_smooth(method = 'lm')

print(globalvars) })

Answer 1

将flowers列为您正在绘制的data.frame列，而不是单独的对象。

pairs3$flowers <- input$vector

然后尝试您的绘图代码。