如何修复Shiny应用点击Table标签页时f1缺var1参数无法生成表格的问题

• 你定义的f1函数中，var1、var2属于没有默认值的必填参数
• 生成Table标签页数据的data_subset响应式逻辑里，调用f1时仅传了数据集、日期、分类三个参数，缺少var1和var2的赋值，因此触发参数缺失报错

两种方案任选其一即可：

方案1：调用f1时补全参数 #

修改data_subset中调用f1的代码，和绘图模块保持一致传入固定参数即可：

Test <- cbind(df2, coef = apply(df2, 1, function(x) {f1(data(),x[1],x[2], var1 = "Days", var2 = "Numbers")}))

方案2：给f1函数的参数添加默认值 #

直接修改f1的定义行，给var1、var2设置默认值，后续所有调用都不需要额外传这两个参数：

f1 <- function(df1, dmda, CategoryChosse, plot = FALSE, var1 = "Days", var2 = "Numbers", gnum=0) {

修改完成后即可正常加载Table标签页的表格内容。

内容的提问来源于stack exchange，提问作者Antonio