# NOT RUN {
## create input parameters
i_mmckk <- NewInput.MMCKK(lambda=8, mu=2, c=5, k=12, method=0)
## Build the model
o_mmckk <- QueueingModel(i_mmckk)
## Returns the parameters
Pn(o_mmckk)
Qn(o_mmckk)
# }
Run the code above in your browser using DataLab