r - 单击 actionButton 时向数据框添加新行
问题描述
我正在尝试创建一个 R Shiny 应用程序,该应用程序根据输入值创建一个 1 行数据框,当单击操作按钮时,它将该数据框作为新行添加到另一个数据框(开始为空白)。
我浏览了 StackOverflow,但找不到可以解决我的问题的东西。
我想要发生的事情如下:
input$one <- "A"
input$two <- "B"
input$three <- "C"
df1 = A | B | C
现在,当我按下 actionButton 时,我希望df2
(从空白开始)如下:
df2 = A | B | C
接下来,我希望能够添加更多行。因此,如果我将输入值更改为以下内容:
input$one <- "X"
input$two <- "Y"
input$three <- "Z"
df1 = X | Y | Z
我再次单击 actionButton,df2
应该更新为以下内容:
df2 = A | B | C
X | Y | Z
最后,最后一次更新并单击 actionButton 如下:
input$one <- "1"
input$two <- "2"
input$three <- "3"
df1 = 1 | 2 | 3
*actionButton click*
df2 = A | B | C
X | Y | Z
1 | 2 | 3
我想尽可能多地执行此操作,每次单击 actionButton 时,它都会将其中的任何内容df1
作为新行添加到df2
. 我知道这必须使用 rbind,但是如何使用 actionButton 来完成呢?
解决方案
这对我有用。
mydata <- data.frame()
df <- eventReactive(input$add_payer, {
newrow <- data.frame(ALEMO())
mydata <<- rbind(mydata, newrow)
})
output$all_data <- renderTable(df())
推荐阅读
- visual-studio-code - Wireshark lua 包路径是什么?
- vim - goto-file (gf) 优先目录而不是文件名
- python - 使用 django-extra-views 的内联表单集的问题
- flutter - 如何在小部件树中使用此函数的值?
- sql-server - T-SQL 中的原始 XML 反序列化
- python - 每月数据汇总
- c++ - 如果没有错误,为什么GL函数调用-1返回的位置?
- spring-boot - 在 Spring Boot 运行时将 Jasper Sub Report 作为参数传递
- node.js - Node.js 拆分文件行
- google-apps-script - 如何将范围从一个 Google 工作表移动到另一个工作表/标签中的下一个空白行