r - R6 类函数未在 Shiny Module 服务器中提供输出
问题描述
我已将 R6 类定义为全局函数并尝试在模块中使用它。R6 函数是事件响应函数,预计在单击按钮时初始化类中的新元素。尽管代码运行正常,但它并没有创建新元素。
ns <- NS(id)
div(class = "ui form", id= "stox", style = "text-align: center; color: black",
h4(class= "ui top attached header", "You don't have a portfolio. Please create your Portfolio first"),
div(class = "ui bottom attached segment",
h4(class= "ui dividing header"),
div(class= "ui inverted form",
div(class= "two fields",
div(class= "field",
"Portfolio Name", text_input(ns("ex"), label = "Portfolio Name", type = "text", placeholder = "Stoxx11")),
div(class= "field",
actionButton(ns("submitpf"), "Submit!", class = "btn-success"))
))))
}
pfcreate_server <- function(id) {
moduleServer(id, function(input, output, session) {
eventReactive(input$submitpf, {
New<- Portfolio$new(as.character(input$ex), as.character(user()), as.character(Game_list[[id]]$name), as.numeric(Game_list[[id]]$Size), as.numeric(Game_list[[id]]$Size))
Game_list[[id]]$NewPortfolio(New)
Game_list[[id]]$NewChallenger(user())
})
})
}```
解决方案
推荐阅读
- java - 避免可观察的 dom 监听器
- alfresco - Alfresco Process Services 涉及任务通知
- amazon-web-services - 所有 AWS 服务的 csv 列表
- hibernate - 从 Hibernate 中的 JoinTable 中检索所有记录
- javascript - 在 IF 条件内访问车把中的特定数组项
- codeigniter - 加密通过创建随机键和值来解密数据
- ios - 关闭包含显示 PDF 的 WKWebView 的 ViewController 时触发 iOS 断言
- google-sheets - Google Forms 更改 Google Sheets 中不同工作表上的单元格引用
- python - Python - 如何从 Pandas 数据框创建 JSON 嵌套文件并分组?
- flutter - 是否可以将使用虚幻引擎创建的游戏嵌入到 Flutter 移动应用程序中?