闪亮的悬停仅显示变量值
维舍什·施里瓦斯塔夫
这是一个可重现的示例，靠近我正在开发的 Shiny App：
library(ggplot2)
library(shiny)
ui <- basicPage(
plotOutput("plot1", hover = "plot_hover"),
verbatimTextOutput("info")
)
server <- function(input, output) {
output$plot1 <- renderPlot({
ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point()
})
output$info <- renderPrint({
nearPoints(mtcars, input$plot_hover, threshold = 10, maxpoints = 1,
addDist = TRUE)[1]
})
}
shinyApp(ui, server)
这是应用程序，显示了悬停功能，白色十字是鼠标指针： 
我只想显示 mpg 值，没有行名。我用nearPoints试过这个：
nearPoints(mtcars, input$plot_hover, threshold = 10, maxpoints = 1,addDist = TRUE)[1,1], which resulted in:
我想要的只是 mpg 值，没有行名，没有 [ 1 ]，什么都没有。如何才能做到这一点？
卡洛斯·桑蒂兰
cat() 可用于执行此操作。
下面的代码，应该为你做的伎俩
output$info <- renderPrint({
val <-nearPoints(mtcars, input$plot_hover, threshold = 10, maxpoints = 1,addDist = TRUE)[1,1]
cat(val)
})
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
显示变量值？
- 2
通过将鼠标悬停在Spyder中来显示变量值
- 3
如何以HTML，<div id>和鼠标悬停效果显示js变量值
- 4
显示基于$ scope变量值的元素
- 5
不显示字符变量值
- 6
在文本javafx中显示变量值
- 7
显示基于$ scope变量值的元素
- 8
在jQuery代码中显示变量值
- 9
空变量值
- 10
意外的变量值
- 11
输出变量值
- 12
改组变量值
- 13
更新变量值
- 14
变量值不变
- 15
分配值时不显示变量值
- 16
在Python中使用％d准备要显示的变量值
- 17
执行存储过程时显示声明的变量值
- 18
MessageBox在Power Builder中显示文本和变量值
- 19
显示选定变量值的Sublime文本插件？
- 20
“ ???” 显示在背景虚化而不是变量值中
- 21
使用v-if根据变量值显示html元素
- 22
调试断点-在日志消息中显示变量值
- 23
显示对象的变量值不等于0
- 24
如何在jsp的表格顶部显示变量值？
- 25
显示带有html标签的javascript变量值
- 26
在PHP的Bootstrap模型中显示foreach循环变量值
- 27
根据更改$ rootScope变量值显示div
- 28
骨干js在视图中显示html的变量值
- 29
元素不会根据变量值和 if 语句显示（）
我来说两句