powered by
queue_list
get departure times from queue_list object
depart(x)
departure times
an queue_list object
arrivals <- cumsum(rexp(10)) service <- rexp(10) queue_obj <- queue_step(arrivals, service) depart(queue_obj) queue_obj$departures_df$departures
Run the code above in your browser using DataLab