df_visit <- sim_test_data_study(
n_pat = 100,
n_sites = 5,
ratio_out = 0.4,
factor_event_rate = - 0.6
)#'
visit <- orivisit(df_visit)
object.size(df_visit)
object.size(visit)
as.data.frame(visit)
Run the code above in your browser using DataLab