data(us_second_cancer)
#prep step - reshape wide a sample of 10000 rows from us_second_cancer
usdata_wide_sample <- msSPChelpR::reshape_wide(us_second_cancer,
case_id_var = "fake_id",
time_id_var = "SEQ_NUM",
timevar_max = 2,
datsize = 10000)
#now we can reshape long again
msSPChelpR::reshape_long_tidyr(usdata_wide_sample,
case_id_var = "fake_id",
time_id_var = "SEQ_NUM")
Run the code above in your browser using DataLab