Não foi possível enviar o arquivo. Será algum problema com as permissões?
Diferenças
Aqui você vê as diferenças entre duas revisões dessa página.
|
disciplinas:tea753-2013-02:codigosprob [2013/06/21 11:53] paulojus criada |
disciplinas:tea753-2013-02:codigosprob [2013/06/21 11:54] (atual) paulojus |
||
|---|---|---|---|
| Linha 2: | Linha 2: | ||
| === Problema dos aniversários === | === Problema dos aniversários === | ||
| + | |||
| <code R> | <code R> | ||
| "aniv" <- function(n, p){ | "aniv" <- function(n, p){ | ||
| Linha 30: | Linha 31: | ||
| text(1, 0.5, 0.5, pos=2, off=0.1, cex=0.7) | text(1, 0.5, 0.5, pos=2, off=0.1, cex=0.7) | ||
| text(aniv(p=0.5),0 ,aniv(p=0.5), pos=1, off=0.2, cex=0.7) | text(aniv(p=0.5),0 ,aniv(p=0.5), pos=1, off=0.2, cex=0.7) | ||
| - | <code> | + | </code> |
| === Sequencia de caras (H) e coroas (T) - Simulação === | === Sequencia de caras (H) e coroas (T) - Simulação === | ||
| Linha 63: | Linha 64: | ||
| nTenta(100000, "HTT") | nTenta(100000, "HTT") | ||
| nTenta(100000, "HTH") | nTenta(100000, "HTH") | ||
| - | <code> | + | </code> |
| === Monty Hall - Simulação === | === Monty Hall - Simulação === | ||
| Linha 90: | Linha 91: | ||
| prop.table(table(sim$Res.NT)) | prop.table(table(sim$Res.NT)) | ||
| prop.table(table(sim$Res.T)) | prop.table(table(sim$Res.T)) | ||
| - | <code> | + | </code> |
