R/shinyRespVsRespApp.R

In chapmandu2/CancerCellLines: Analysis of cancer cell line data

#' Response vs Response Shiny visualisation
#'
#' Interactive plots comparing and visualising different response variables in Shiny
#'
#' @param con A \code{SQLiteConnection} object to the database
#' @return Launches an interactive Shiny application
#' @export
#' @import shiny
shinyRespVsRespApp <- function(con, drug_df=NULL) {

  shiny::shinyApp(
    ui = shinyRespVsRespUI(),
    server = function(input, output) {
      shinyRespVsRespServer(input, output, con, drug_df)
    }
  )
}