Add Nodal Control (incl. para-aortic) Event Variable

This function creates a new disease event variable for the endpoint "Nodal control (incl. para-aortic)" based on EMBRACE-II data.

Usage

emii_add_nodalcontrol_incl_pao(data)

Arguments

data

A tibble containing EMBRACE-II data

Value

A tibble with the new disease event variable added

Examples

library(dplyr)
#> 
#> Attaching package: ‘dplyr’
#> The following objects are masked from ‘package:stats’:
#> 
#>     filter, lag
#> The following objects are masked from ‘package:base’:
#> 
#>     intersect, setdiff, setequal, union

# Create sample data
data <- tibble(
  event_pelvic_nodal = c(0L, 1L, 0L, 1L),
  event_paraaortic_nodal = c(0L, 0L, 1L, 1L)
)

# Apply the function
result <- emii_add_nodalcontrol_incl_pao(data)
#> Error in validate_input(data): Required variables not found in the data: event_nodalfailure
print(result)
#> Error: object 'result' not found