R/MFSlogit.R

In mephas/mephas: Medical and Pharmaceutical Statistics Based on Shiny

##'
##' MFSlogit includes
##' (1) logistic regression for binary outcomes,
##'
##' @title MEPHAS: Logistic Regression Model (Advanced Method)
##'
##' @return shiny interface
##'
##'
##' @importFrom ROCR performance prediction
##' @importFrom stats anova as.formula binomial glm predict residuals step relevel
##'
##' @examples
##' if (interactive()) {
##'  MFSlogit()
##' }
##' 
##' if (interactive()) {
##'  mephasOpen("logisreg")
##' }
##'
##' @export
MFSlogit <- function(){
#requireNamespace("mephas.tools", quietly = TRUE)
  suppressPackageStartupMessages(suppressMessages(
    shiny::runApp(system.file("7_2MFSlogit", package = "mephas"))
  ))
}