## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment  = "#>"
)

## ----setup--------------------------------------------------------------------
library(MSMGOptimizer)

## ----installation, eval = FALSE-----------------------------------------------
#  # Install from CRAN
#  install.packages("MSMGOptimizer")
#  
#  # Or install the development version from GitHub
#  remotes::install_github("Duah-Philip/MSMGOptimizer")

## ----list-files---------------------------------------------------------------
# List all bundled example files
list.files(system.file("extdata", package = "MSMGOptimizer"))

## ----example-path-------------------------------------------------------------
# Get the full path to the standard setup file
msmg_example("Setup_File.xlsx")

# Confirm the tutorial document is present
file.exists(msmg_example("Tutorial.docx"))

## ----verify-------------------------------------------------------------------
# Confirm the Shiny app directory is correctly installed
app_path <- system.file("shiny", package = "MSMGOptimizer")
file.exists(app_path)

## ----launch, eval = FALSE-----------------------------------------------------
#  # Launch the optimizer (interactive session only)
#  if (interactive()) {
#    ShinyMSMGOptimizer()
#  }