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

## ----complete-cases, fig.cap = "Algorithm 1", echo = FALSE--------------------
knitr::include_graphics("algorithm_1.PNG")

## ----available-cases, fig.cap = "Algorithm 2", echo = FALSE-------------------
knitr::include_graphics("algorithm_2.PNG")

## ----findallsuitableobservations, fig.cap = "Algorithm 3", echo = FALSE-------
knitr::include_graphics("algorithm_3.PNG")