Simular erros de sinal: alterando probabilidades
No exercício anterior, cada simulação tinha uma probabilidade fixa de erro de sinal em cada etapa.
Na pergunta original, a probabilidade de erro de sinal pode ser diferente em cada etapa; o único requisito é que cada probabilidade seja menor que 0,50.
Aqui, vamos simular um problema de matemática com 2 etapas em que a probabilidade de uma troca em cada etapa é 0,49 e 0,01, o que significa alta chance de ficar incorreto na primeira etapa e baixa chance de voltar ao correto.
Este exercício faz parte do curso
Probability Puzzles in R
Instruções do exercício
- Use a função
sapplycom a funçãorbinompara simular as trocas dentro de um problema, com probabilidades de troca de 0,49 e 0,01 para a primeira e a segunda etapas, respectivamente. - Determine o número total de trocas que ocorreram.
- Determine se a resposta do problema de matemática estaria correta ou não.
Exercício interativo prático
Experimente este exercício completando este código de exemplo.
set.seed(1)
counter <- 0
for(i in 1:10000){
# Simulate switches
each_switch <- sapply(___)
# Count switches
num_switches <-
# Check solution
if(___){
counter <- counter + 1
}
}
print(counter/10000)