首页 > 解决方案 > 闪亮的错误:未使用的参数(main = "Smear plot",de.tags = dgeChangedGenes())

问题描述

我正在尝试模块化一个闪亮的应用程序,但我不明白这个错误的问题是什么:

error: unused arguments (main = "Smear plot", de.tags = dgeChangedGenes())

这是我的代码:

### UI
### -------------------------------------------------------------------- ###
plotSmearOutput <- function(id) {
  # Create a namespace function using the provided id
  ns <- NS(id)

  tagList(
    fluidRow(plotOutput(ns("deSmear"))),
    br(),
    fluidRow(actionButton(ns("runGlimmaSmear"), label = "Glimma Smear"))
  )
}


### SERVER
### -------------------------------------------------------------------- ###
plotSmear <- function(input, output, session, lrtModel, dgeChangedGenes) {

  output$deSmear <- renderPlot({
    # print(dgeChangedGenes())
    if(!is.null(lrtModel())){
    plotSmear(lrtModel(), main = "Smear plot", de.tags = dgeChangedGenes())
    }
  })

}

lrtModel并且dgeChangedGenes是由另一个模块创建的反应值。

plotSmearedgeR包中的一个函数。

我试图检查我是否可能缺少或多余的括号或括号,但要么我没有找到它,要么我没有。

你知道这里有什么问题吗?

非常感谢。

标签: rshiny

解决方案


推荐阅读