Description Usage Arguments Details References See Also Examples
Returns the vector with the mean number of customers in each node (server) of a Closed Jackson Network
1 2 |
x |
a object of class o_CJN |
... |
aditional arguments |
Returns the vector with the mean number of customers in each node (server) of a Closed Jackson Network
[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 18 19 20 21 22 | ## See example 11.13 in reference [Sixto2004] for more details.
## create the nodes
n <- 2
n1 <- NewInput.MM1(lambda=0, mu=1/0.2, n=0)
n2 <- NewInput.MM1(lambda=0, mu=1/0.4, n=0)
# think time = 0
z <- 0
# operational value
operational <- FALSE
# definition of the transition probabilities
prob <- matrix(data=c(0.5, 0.5, 0.5, 0.5), nrow=2, ncol=2, byrow=TRUE)
# Define a new input
cjn1 <- NewInput.CJN(prob, n, z, operational, 0, 0.001, n1, n2)
# Check the inputs and build the model
m_cjn1 <- QueueingModel(cjn1)
Lk(m_cjn1)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.