# NOT RUN {
strategies <- data.frame(strategy_id = c(1, 2))
patients <- data.frame(patient_id = seq(1, 3), age = c(65, 50, 75),
gender = c("Female", "Female", "Male"))
states <- data.frame(state_id = seq(1, 3),
state_var = c(2, 1, 9))
times <- data.frame(time_id = c(1, 2, 3),
time_start = c(0, 4, 9),
time_stop = c(4, 9, Inf))
hesim_dat <- hesim_data(strategies = strategies,
patients = patients,
states = states,
times = times)
# }
Run the code above in your browser using DataLab