DATA604 - D5

So problem 1; was a simple M/M/1 queue with 120/Hour arrival time, and a service time of 190/Hour.

We modify the original simulation by switching the service time from 60/190 to 60/50; while increasing server capacity from 1 to 3.

Using google 3D warehouse; we import steel plate / drill press models for the simulation; then press [3] to see them in their glorious 3D image.

We then set an experiment to run for 100 hours / 10 replications / 1 hour warm up period

The metrics confirm the model’s validity

p= Server scheduledUtilization

L= ModelEntity average

Let us corroborate these findings

i_mmc = NewInput.MMC(lambda=(120), mu=(50), c=3, n=0, method=0)

o_mmc <- QueueingModel(i_mmc)

L = L(o_mmc)

p = RO(o_mmc)

cat(L,p)

## 4.988764 0.8