ql_summary {queuecomputer} | R Documentation |
Summarise queue lengths
ql_summary(times, queuelength)
times |
numeric vector of times |
queuelength |
numeric vector of queue lengths |
n <- 1e3
arrivals <- cumsum(rexp(n))
service <- rexp(n)
departures <- queue(arrivals, service, 1)
queuedata <- queue_lengths(arrivals, service, departures)
ql_summary(queuedata$times, queuedata$queuelength)