Description Usage Arguments Details References See Also Examples
Returns the input params of an Open Jackson Network
1 2 |
x |
a object of class o_OJN |
... |
aditional arguments |
Returns the input params of an Open Jackson Network. The inputs parameters are created calling previously the NewInput.OJN
[Sixto2004] Sixto Rios Insua, Alfonso Mateos Caballero, M Concepcion Bielza Lozoya, Antonio Jimenez Martin (2004).
Investigacion Operativa. Modelos deterministicos y estocasticos.
Editorial Centro de Estudios Ramon Areces.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | ## See example 11.11 in reference [Sixto2004] for more details.
## create the nodes
n1 <- NewInput.MM1(lambda=8, mu=14, n=0)
n2 <- NewInput.MM1(lambda=0, mu=9, n=0)
n3 <- NewInput.MM1(lambda=6, mu=17, n=0)
n4 <- NewInput.MM1(lambda=0, mu=7, n=0)
m <- c(0, 0.2, 0.56, 0.24, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
# definition of the transition probabilities
prob <- matrix(data=m, nrow=4, ncol=4, byrow=TRUE)
i_ojn1 <- NewInput.OJN(prob, n1, n2, n3, n4)
# Build the model
o_ojn1 <- QueueingModel(i_ojn1)
Inputs(o_ojn1)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.