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)

# 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)
print(result)
#> # A tibble: 4 × 3
#>   event_pelvic_nodal event_paraaortic_nodal event_nodalcontrol_incl_pao
#>                <int>                  <int> <lgl>                      
#> 1                  0                      0 FALSE                      
#> 2                  1                      0 TRUE                       
#> 3                  0                      1 TRUE                       
#> 4                  1                      1 TRUE