{NHSRwaitinglist} is an R package implementing the waiting list management approach described in the paper Understanding Waiting Lists Pressures by Fong et al. The methodology is presented by Neil Walton, Professor in Operations Management at Durham University Business School. The package is being contributed to by members of the NHS-R Community, with the aim of making it simpler for NHS analysts to adopt these methods for the analysis of their own waiting lists.
These videos explain more about the Operations Management methodologies which are encapsulated by the package. Click through to view them on YouTube.
| Detailed presentation of method | Recap of method, and presentation of this package |
|---|---|
 |
 |
| Midlands Analyst Network Huddle, Nov 2023 | Health and Care Analytics Conference e-lab, Jul 2024 |
You can install the current version of {NHSRwaitinglist} from GitHub
as below.
If you have not installed from GitHub before, you may first need to
create and store a “Personal Access Token” (PAT) to grant access to your
account, for example by following the {usethis}
guide.
# install.packages("remotes")
remotes::install_github("nhs-r-community/NHSRwaitinglist", build_vignettes = TRUE)There is a minimal example below. To look in more detail at the functions within the package and some more ways of using them, it is a good idea to review the first two vignettes:
At its most basic, the package can be used to simulate a waiting list (a dataframe of waiting list addition dates and removal dates), and then compute some important statistics. Of course, if you already have waiting list data ready to analyse, you can skip the simulation step in the code below.
# load the package
library(NHSRwaitinglist)
# simulate a waiting list
waiting_list <- wl_simulator(
start_date = "2020-01-01",
end_date = "2024-03-31",
demand = 10, # simulating 10 patient arrivals per week
capacity = 10.2 # simulating 10.2 patients being treated per week
)
# compute some waiting list statistics
overall_stats <- wl_stats(
waiting_list = waiting_list,
target_wait = 18 # standard NHS 18wk target
)
# review the minimal dataset needed to define a waiting list (first 5 rows only)
knitr::kable(head(waiting_list, 5))| Referral | Removal |
|---|---|
| 2020-01-02 | 2020-01-03 |
| 2020-01-03 | 2020-01-04 |
| 2020-01-04 | 2020-01-05 |
| 2020-01-04 | 2020-01-06 |
| 2020-01-06 | 2020-01-07 |
# review the waiting list statistics
knitr::kable(overall_stats)| mean_demand | mean_capacity | load | load_too_big | count_demand | queue_size | target_queue_size | queue_too_big | mean_wait | cv_arrival | cv_removal | target_capacity | relief_capacity | pressure |
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 9.818065 | 10.08372 | 0.9736549 | FALSE | 2174 | 5 | 44.18129 | FALSE | 1.8 | 1.131775 | 0.7003787 | 10.01489 | NA | 0.2 |
If you want to learn more about this project, please join the discussion at the NHS-R Community Slack group and the specific channel #managing-waiting-lists.
Please see our guidance on how to contribute.
This project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.
The simplest way to contribute is to raise an issue detailing the feature or functionality you would like to see added, or any unexpected behaviour or bugs you have experienced.
You are welcome to also submit Pull Requests and, as the
main branch is protected and won’t accept pushes directly
even if you have been added to the repository as a member, the workflow
will be (from your own forked repository if you are not a member, or a
clone of the repository if you are a member):
Thanks goes to these wonderful people (emoji key):
 Jacqueline Grout 🤔 💻 |
 Tom Smith 💻 |
 Matt Dray 💻 |
 kaituna 📖 💻 |
 Chris Mainey 💻 📖 ⚠️ |
 PeterSNHS 📖 |
 neilwalton 💻 📖 |
This project follows the all-contributors specification. Contributions of any kind welcome!