# NOT RUN {
## Generating a generic Birth and Death model with the same lambda and mu vectors as M/M/1 model
## create input parameters
lambda <- rep(1/4, 200)
mu <- rep(1/3, 200)
i_BnD <- NewInput.BnD(lambda=lambda, mu=mu)
## Build the model
o_BnD <- QueueingModel(i_BnD)
## It returns the Inputs
Inputs(o_BnD)
# }
Run the code above in your browser using DataLab