Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- > sr=5;res=replicate(10000,t.test(rnorm(100),rnorm(10,0,sr))$p.value)
- > mean(res<.05)
- [1] 0.0501
- > sr=5;res=replicate(10000,t.test(rnorm(100),rnorm(10,0,sr))$p.value)
- > mean(res<.05)
- [1] 0.0499
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
