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:ce003:semana11 [2007/05/18 22:26] (atual) paulojus criada |
||
---|---|---|---|
Linha 1: | Linha 1: | ||
+ | ==== Aula 18/05/2007 ==== | ||
+ | |||
+ | Exemplo de comparação de eficiência de estimadores | ||
+ | |||
+ | <code R> | ||
+ | ## X ~ N(0,1) N=1000 amostras de tamanho 20 | ||
+ | sim1 <- matrix(rnorm(20*1000), nc=20) | ||
+ | medias1 <- apply(sim1,1,mean) | ||
+ | medianas1 <- apply(sim1,1,median) | ||
+ | var(medias1) | ||
+ | var(medianas1) | ||
+ | rm(sim1) | ||
+ | |||
+ | ## | ||
+ | ## X ~ N(3.1, 0,4/3) N=5000, amostras de tamanho 50 | ||
+ | sim2 <- matrix(rnorm(50*5000), nc=20) | ||
+ | medias2 <- apply(sim2,1,mean) | ||
+ | medianas2 <- apply(sim2,1,median) | ||
+ | var(medias2) | ||
+ | var(medianas2) | ||
+ | </code> | ||