如何在R闪亮应用程序中的verbatimTextOutput上获取点击事件？
如何在R闪亮应用程序中的verbatimTextOutput上获取点击事件？
提问于 2018-02-26 14:45:37
当点击这个verbatimTextOutput时，我想要显示一个绘图输出而不是我的verbatimTextOutput。我如何更改我的代码来实现这一点？我没有设法找到获取clickevent的方法。
library(ggplot2)
library(shiny)
ui <- fluidPage(
fluidRow(
verbatimTextOutput("myFirstText")
)
)
server <- function(input, output) {
output$myFirstText=renderText({
"Click on this text to see a histogram of the AirPassengers-data instead of this very text."
})
output$myPlot=renderPlot({
hist(AirPassengers)
})
}
shinyApp(ui, server)回答 1
Stack Overflow用户
发布于 2018-02-26 15:02:21
我不确定是否真的有可能做你想做的事情。但是您可以使用shinyjs包来拉近距离。您可以尝试：
ui <- fluidPage(
shinyjs::useShinyjs(),
fluidRow(
a(id = "toggleAdvanced", "Click on this text to see a histogram of the AirPassengers-data instead of this very text.", href = "#"),
shinyjs::hidden(
div(id = "advanced",
plotOutput("myPlot")
)
)
)
)
server <- function(input, output) {
shinyjs::onclick("toggleAdvanced",
shinyjs::toggle(id = "advanced", anim = TRUE))
output$myPlot=renderPlot({
hist(AirPassengers)
})
}
shinyApp(ui, server)页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/48991081
复制相关文章
【IOC 控制反转】Android 事件依赖注入 ( 事件依赖注入具体的操作细节 | 获取 Activity 中的所有方法 | 获取方法上的注解 | 获取注解上的注解 | 通过注解属性获取事件信息 )
点击加载更多
相似问题
R闪亮:并排verbatimTextoutput()
闪亮:阅读verbatimTextOutput的文本内容
如何在闪亮的应用程序中获得verbatimTextOutput与常规文本的内联？
R在表域上闪亮的点击
R:闪亮应用程序中的悬停事件
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
社区富文本编辑器全新改版！诚邀体验～
全新交互，全新视觉，新增快捷键、悬浮工具栏、高亮块等功能并同时优化现有功能，全面提升创作效率和体验
腾讯云开发者
