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

## ----setup--------------------------------------------------------------------
# library(MUGS)

## ----load_data----------------------------------------------------------------
# data(pairs.rel.EV)
# data(U.2)

## ----run_simulation-----------------------------------------------------------
# # Evaluate simulation
# evaluation_results <- evaluation.sim(pairs.rel.EV, U.2)

## ----examine_output-----------------------------------------------------------
# # View the structure of the output
# str(evaluation_results)
# 
# # Display first few rows of the results
# cat("\nEvaluation Results (first 5 rows):\n")
# print(head(evaluation_results, 5))