# NOT RUN {
## create input parameters
i_mmckm <- NewInput.MMCKM(lambda=0.25, mu=4, c=2, k=4, m=8, method=0)
## Build the model
o_mmckm <- QueueingModel(i_mmckm)
## Report the results
Report(o_mmckm)
# }
Run the code above in your browser using DataLab