- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我想在 Shiny 的 aselectize 小部件中选择一个选项时触发一些功能。但是,我不想触发功能服务器端,而是在客户端触发。 Observe 和 observeEvent 是在服务器端 (server.R) 起作用的,但这不是我想要的。
我尝试了下面的方法,但它在 ui.R 中不起作用
tags$script('
$( document ).ready(function() {
$("#fTICKER4").selectize({
onChange: function () {
alert("Selectize event: Change");
}
});
'),
请提出 Shiny 的前进方向
最佳答案
如果您想在小部件的值更改时触发一些 javaScript 函数,那么您应该查看 this文章。您会发现 shiny 也支持许多 javaScript 事件。
让我们看一下 shiny:inputchanged
事件,因为它执行您想要的操作:
The event shiny:inputchanged is triggered when an input has a new value, e.g., when you click an action button, or type in a text input. The event object has properties name (the id of the input), value (the value of the input), and inputType (the type of the input, e.g. shiny.action).
还有一个很好的例子
$(document).on('shiny:inputchanged', function(event) {
if (event.name === 'foo') {
event.value *= 2;
}
});
可以通过更改小部件的 ID 并将 event.value...
替换为 alert
函数来轻松调整。据我了解你的问题,你正在寻找这段代码:
$(document).on("shiny:inputchanged", function(event) {
if (event.name === "fTICKER4") {
alert("inputchanged event: Change");
}
});
完整示例
library(shiny)
ui <- fluidPage(
tags$script('
$(document).on("shiny:inputchanged", function(event) {
if (event.name === "fTICKER4") {
alert("inputchanged event: Change");
}
});
'),
sliderInput("fTICKER4", "Change triggers an event", min = 1, max = 10, value = 5),
sliderInput("other", "Change doesn't trigger an event", min = 1, max = 10, value = 5)
)
server <- function(input, output) {
}
shinyApp(ui, server)
关于r - 在 Shiny 中选择 onChange,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/39539319/
我是一名优秀的程序员,十分优秀!