Distribución elegida: de PoissonDIS=rpois(1000,10)
print(DIS)## [1] 2 10 9 10 11 17 7 8 13 10 9 10 8 17 5 13 13 9 6 11 11 10 13 17
## [25] 10 10 9 11 9 7 8 8 10 11 13 8 6 16 7 11 12 7 11 9 7 19 9 18
## [49] 11 13 8 11 9 14 7 12 9 8 9 11 6 5 13 18 12 12 10 8 8 9 6 21
## [73] 15 8 7 8 13 5 11 11 11 9 12 10 10 8 10 12 11 11 13 5 14 13 10 13
## [97] 13 12 6 6 13 15 16 9 6 7 10 12 9 10 10 9 8 15 13 15 6 8 13 5
## [121] 7 14 11 7 11 14 14 4 9 7 16 9 11 9 7 9 7 12 7 11 9 12 10 11
## [145] 9 11 7 10 10 11 9 12 12 14 10 9 8 11 12 11 11 13 10 10 15 8 15 12
## [169] 14 11 9 8 7 18 17 13 9 5 12 14 8 10 16 12 5 10 8 8 10 11 9 11
## [193] 8 8 13 14 8 8 6 11 12 5 7 9 8 6 14 7 8 8 9 15 16 9 7 8
## [217] 6 16 12 14 8 9 13 13 7 11 9 8 5 6 9 13 14 7 7 8 11 17 13 7
## [241] 4 3 19 10 13 7 9 11 12 7 7 10 6 17 15 9 11 6 23 9 12 3 12 12
## [265] 10 15 8 13 9 9 8 7 11 17 14 16 6 16 7 12 10 13 14 13 16 11 5 16
## [289] 11 14 10 10 9 11 8 9 14 16 10 10 12 12 12 9 14 6 10 16 8 8 12 10
## [313] 5 7 12 9 4 9 5 9 13 11 13 6 6 8 12 15 10 11 12 11 8 8 12 12
## [337] 12 12 13 8 12 11 10 10 3 12 4 11 18 10 17 9 8 16 11 11 12 9 9 10
## [361] 11 9 8 11 10 4 16 14 11 7 7 10 7 13 15 10 9 7 15 12 9 12 11 16
## [385] 6 11 10 12 5 13 9 9 14 14 11 5 11 6 18 9 9 8 12 9 14 4 8 13
## [409] 8 11 12 13 11 12 7 15 14 10 11 12 9 10 7 9 8 11 8 10 12 13 10 10
## [433] 10 4 13 12 8 8 14 12 13 9 7 11 18 16 8 8 8 16 6 5 13 7 8 11
## [457] 12 6 14 15 12 7 10 14 9 9 11 6 16 9 6 13 5 8 16 14 12 14 11 6
## [481] 8 9 9 7 5 16 11 12 10 5 12 16 15 11 13 10 7 9 14 8 5 10 11 8
## [505] 9 11 12 7 9 5 12 9 4 4 18 6 11 21 11 5 11 6 11 10 14 3 11 9
## [529] 15 12 15 14 12 18 7 7 7 12 6 10 8 12 6 10 13 8 9 9 10 10 11 15
## [553] 11 9 10 9 10 8 13 13 11 9 15 5 15 11 12 12 11 6 17 5 15 8 6 15
## [577] 8 4 6 8 10 10 11 5 5 8 9 8 9 4 12 13 8 11 4 8 14 6 13 16
## [601] 15 17 5 8 18 7 11 16 12 9 9 11 9 18 10 12 15 8 6 12 12 10 14 14
## [625] 12 12 9 9 7 12 5 10 11 9 10 10 9 13 14 12 8 8 16 11 12 12 7 8
## [649] 10 8 11 16 6 7 12 16 6 11 8 12 10 7 8 13 12 11 11 9 9 8 14 8
## [673] 12 11 6 7 14 12 9 9 8 6 8 6 6 14 16 13 9 8 14 10 10 7 6 10
## [697] 12 14 12 13 12 7 19 5 4 4 11 11 7 10 14 9 9 8 10 9 10 8 12 12
## [721] 10 10 13 8 8 6 8 5 15 9 7 6 13 10 10 11 9 14 8 10 15 17 10 10
## [745] 8 12 5 12 8 9 3 14 9 13 4 3 16 12 8 6 9 13 11 13 10 15 12 9
## [769] 10 13 7 8 7 11 13 9 9 9 7 7 14 8 9 9 7 10 9 14 10 6 8 7
## [793] 8 16 13 18 13 11 10 12 10 16 11 11 11 9 10 6 10 8 7 10 6 9 6 8
## [817] 8 9 11 3 13 8 11 9 10 15 8 8 11 6 8 14 14 5 9 5 11 13 10 13
## [841] 8 6 10 19 12 12 7 7 7 12 10 14 9 10 10 7 8 9 20 6 5 8 8 8
## [865] 17 6 12 7 12 13 11 14 5 14 13 5 9 9 9 7 11 7 11 14 5 17 8 9
## [889] 11 18 8 12 7 11 14 12 8 9 10 9 6 13 11 9 10 11 7 7 5 11 10 6
## [913] 10 5 9 11 10 11 16 8 10 11 12 9 11 9 10 8 11 15 12 11 8 10 12 12
## [937] 12 14 8 10 10 7 6 9 12 12 12 17 14 14 10 9 7 9 8 6 13 3 6 14
## [961] 21 10 12 12 9 8 9 10 10 12 6 13 11 9 9 8 7 14 12 9 14 19 16 14
## [985] 10 8 13 7 10 8 7 9 8 12 8 11 13 6 9 7\[ -n\lambda - \sum_{j-1}^{n}ln(x_{j}!)+ln(\lambda)\sum_{j-1}^{n}x_{j} \] 3) Estimación por máxima verosimilitud