2008-08-01から1ヶ月間の記事一覧

気になる論文

最近暑さのせいか寝不足だ。そして,明日から盛岡に行きます。 成功を祈る。 ∀はfor all

> sqr.obs data [,1] [,2] [1,] 5 7 [2,] 13 12 > sqr.obs(data)->data.obs [,1] [,2] [1,] 0.1351351 0.1891892 [2,] 0.3513514 0.3243243 > ES.w2(data.obs)->data.w > data.w [1] 0.09678053 #Cohenのeffect sizeを算出。 > pwr.chisq.test(w=data.w,df=1…

先日のやり方は間違ってました。 分割表の確率の計算方法が,期待値算出になってました。 正しくは,実際に得られたデータの比率を計算するだけです。 まず,以下の関数を再度定義。 sqr.obsで,先日の例をおさらい。 > data [,1] [,2] [1,] 5 7 [2,] 13 12 …