# 行の中で、「#」以降は、コメントアウトで処理しません。

# ===================================================

# Cドライブにv02dataというフォルダーを作り、v02c2memory.csv を置いているという設定

# データの読み込み

KEKKA <- read.csv("C:/v02data/v02c2memory.csv")

# データフレーム名を省略できるようにする

attach(KEKKA)

# 効果量の計算にパッケージeffsizeを使用 (要インストール)

library(effsize)

# 記述統計

tapply(SAISEI, TAIMINGU, mean)

tapply(SAISEI, TAIMINGU, sd)

barplot(tapply(SAISEI, TAIMINGU, mean))

# 対応のないt検定

t.test(SAISEI ~ TAIMINGU, var.equal=TRUE)

# 効果量 (effsizeパッケージを使用)

cohen.d(SAISEI ~ TAIMINGU)

# ウェルチの検定

t.test(SAISEI ~ TAIMINGU)

# データフレーム名の省略を解除する

detach(KEKKA)

# 参考文献

# 山田剛史・村井潤一郎・杉澤武俊 (2015). Rによる心理データ解析 ナカニシヤ出版, p.33-37.

# ===================================================

# 2017.02.23 橋本貴充・荘島宏二郎