Leonard de Assis ldeassis
ldeassis
/ Simulação margem de erro.R
Created
July 22, 2014 01:15
Calcula a probabilidade do segundo maior valor ser maior ou igual ao maior valor.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ### | |
| ### Simula um cenário onde duas proporções possuem | |
| ### diferença de 4 pontos em uma margem de erro de 2 pontos | |
| ### | |
| ### simula amostras aleatórias de tamanho n | |
| ### A idéia principal é contar quantas vezes | |
| ### o B (menos proporção) ficou na frente | |
| ### do A (Maior proporção) quando temos 0.44 a 0.40 | |
| ### como valor estimado de ambas | |
| simula <- function( |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ### | |
| # Brincando de Estatística Bayesiana | |
| # | |
| require(tidyverse) | |
| n1 <- 9.5 | |
| n2 <- 0.5 | |
| n<-68 | |
| n.inocente<- 68 | |
| n.culpado <- n-n.inocente |