Advertisement
JosepRivaille

PE - Neos Solver in the cloud

Apr 9th, 2016
211
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
R 1.37 KB | None | 0 0
  1. # Neos Solver in the cloud
  2.  
  3.   lambda = 6.4
  4.  
  5. # Exercici 1: Se admite en nuestro caso que la variable de estudio se distribuye según una ley Poisson con promedio=6.4. Calcule la probabilidad de que en cierta hora el número de problemas recibidos sea menor que 6.
  6.   x = 6
  7.   #menor
  8.   ppois(x-1, lambda)
  9.   #menor igual
  10.   ppois(x, lambda)
  11.   #mayor
  12.   1 - ppois(x, lambda)
  13.   #mayor igual
  14.   1 - ppois(x-1, lambda)
  15.  
  16. # Exercici 2: Calcule la probabilidad de observar exactamente 6 llegadas en una hora.
  17.   x = 6
  18.   dpois(x, lambda)
  19.  
  20. # Exercici 3: Averigüe ahora cuál es la probabilidad de que en un intervalo de 2 horas lleguen 12 problemas a Neos Solver.
  21.   lambda2h = lambda*2
  22.   x = 12
  23.   dpois(x, lambda2h)
  24.  
  25. # Exercici 4:
  26.   60/lambda
  27.  
  28. # Exercici 5: ¿Cuál es la probabilidad de estar más de 9 minutos sin recibir un problema?
  29.   min = 9
  30.   lambdaxmin = lambda*min/60
  31.   #Mes de 9 min
  32.   dpois(0, lambdaxmin)
  33.   #Menys de 9 min
  34.   1 - dpois(0, lambdaxmin)
  35.  
  36. # Exercici 6: A continuación suponga que existen 17 servidores preparados para resolver los problemas que lleguen al site. Todos ellos se caracterizan por una probabilidad 0.07 de recibir 3 problemas en una hora. Preguntamos por la probabilidad de tener en cierta hora más de 3 servidores recibiendo exactamente 3 problemas.
  37.   nserv = 17
  38.   p = 0.07
  39.   k = 3
  40.   1 - pbinom(k, nserv, p)
  41.  
  42. # JosepRivaille
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement