忍者ブログ
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。


参考は偏イータ二乗と同じ

source("http://psychology3.anu.edu.au/people/smithson/details/CIstuff/Nonct.ssc")
tv <- 2.141
df.t <- 58
n1 <- 30
n2 <- 30

# 効果量Cohen's d
(d <- tv/(sqrt((n1*n2)/(n1+n2))))
# 関連度r
(rv <- sqrt((tv^2)/(tv^2+df.t)))

# t値の信頼区間
lot(tv, df.t, 0.95)
hit(tv, df.t, 0.95)

# dの信頼区間
ncplow <- lot(tv, df.t, 0.95)[1]
ncpupp <- hit(tv, df.t, 0.95)[1]
(dlow <- ncplow/sqrt(n1*n2/(n1+n2)))
(dupp <- ncpupp/sqrt(n1*n2/(n1+n2)))
# 関連度rの信頼区間。単なる点双列相関なのでcor.testでもいいが
library(psychometric)
(CIr(rv, df.t+2, 0.95))


# Cohenのdについてメモ
(d <- (m1-m2)/sqrt(sp))
## 普通は分散とNからspを求める
var1 <- 2.001^2 # 普通はローデータを使おう
var2 <- 3.073^2
## sp (プールされた分散) について。とりあえずこれ使おう
sqrt((var1+var2)/2) # よく見る効果量の分母
sqrt((((n1-1)*var1)+((n2-1)*var2))/(n1+n2)) # 各群の人数が違うとき
### 心理統計学の基礎 p. 162では違う数式をあげている。色々回ってみるとこれはレアケースのようだ
sqrt((var1*n1+var2*n2)/(n1+n2-2)) # 心理統計学の基礎 p. 162
sqrt((var1*n1+var2*n2)/(n1+n2)) # 心理統計学の基礎 p. 162で、分母の-2をとった (自由度じゃなくてNの総計にした) ら#よく見る…と一致する
sqrt((((n1-1)*var1)+((n2-1)*var2))/(n1+n2-2)) # 各群の人数が違うとき。これは-2すると他と一致する
PR
Comment
1
игры second island early 2-grand play
Контролируйте свой острый язычок.
В этом месяце все ваши чаяния будут сосредоточены на делах, а о любви придется на время забыть.
Тем более, что Лев поступит все равно так, как будет считать нужным, поэтому уступить проще будет Весам.
Гадание на Картах Таро, Рунах.
Эмоциональный заряд бодрости, полученный на новогодних праздниках, поможет вам не потерять оптимизма и во второй половине января 2015 года.

cccp

2
бука ру
Следующее видео гороскоп Рыбы на июль 2015 года.
Там есть несколько интересных вещей типа уровня угрозы, но в целом сайт выглядит пустым.
Кольцо для гороскоп на неделю 30октября - 5 ноября и твоего знака Зодиака15 ноя 2010 Знаки зодиака логотипы.
Я вообще ни от чьей помощи не собиралась отказываться.
Дни, в которые Скорпионам следует проявить осторожность: 7 июля, 23 июля, 29 июля 2015.

cccp

<a href=http://world-warplanes.my1.ru/news/world_of_warplanes_onlajn/1-0-28/>World Of Warplanes Игра Онлайн</a>

Trackback
Trackback URL

Comment form
Title
Color & Icon Vodafone絵文字 i-mode絵文字 Ezweb絵文字  
Comment
Name
Mail
URL
Password
プロフィール
HN:
tao
HP:
性別:
非公開
職業:
会社員
趣味:
アウトドア、自転車、ジョギング、英語学習
自己紹介:
・千葉在住のサラリーマンです。データ分析っぽいことが仕事。
・今年英検1級取得。今はTOEIC高得点を目指して勉強中。
・興味のあることは野球、アウトドア、英語学習、統計、プログラミング、PC関係などなど。
ブログ内検索
freead
順位表
プロ野球データFreak
セリーグ順位表
パリーグ順位表