knitr::opts_chunk$set(collapse = TRUE, comment = "#>")
library(targets)

```{targets invasiveTimeSeriesData} tar_target(invasiveTimeSeriesData, make_invasive(data_formatted))

```r
glue::glue(
"**Testing dataset contains {
  nrow(tar_read(invasiveTimeSeriesData))
  } observations from {
    tar_read(invasiveTimeSeriesData) %>%
                 distinct(id) %>%
                 nrow()
                 } patients**"
                 )


awconway/eicu_nitro documentation built on Feb. 21, 2022, 4:35 p.m.