R Shiny dataInput自动关闭选项

Question

对于R中的dateInput函数，我们如何嵌入JavaScript并使datepicker自动关闭？

我在另一篇JS帖子中发现，选项是

$('#datepicker').datepicker({
autoclose: true,
});

如何将此函数添加到R Shiny？谢谢!

Answer 1

我想出了一个投票解决方案。尝试将这段javascript代码另存为.js文件，并将其放入正文末尾的闪亮应用程序中。根据您的R代码，datepickerId是datepicker字段的id。Here is how to include javascript files into shiny.

var datepickerId = "myDate",
updateDatepicker = function(){
obj = $("div#"+datepickerId+" .form-control.datepicker");
if(obj.data().hasOwnProperty("datepicker")){
obj.on('changeDate', function (ev) {
     $(this).datepicker('hide');
});
} else {
window.setTimeout(updateDatepicker(),100);
}
};
updateDatepicker();
// alternative: window.onload = function(){ updateDatepicker(); };