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

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

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

# データの読み込み

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

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

attach(KEKKA)

# 記述統計

tapply(SEITOU, MOJIRETSU, mean)

tapply(SEITOU, MOJIRETSU, sd)

barplot(tapply(SEITOU, MOJIRETSU, mean))

# 分散分析

BUNSEKI <- aov(SEITOU ~ MOJIRETSU) # オブジェクトの作成

summary(BUNSEKI) # 分散分析

TukeyHSD(BUNSEKI) # 多重比較

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

detach(KEKKA)

# 参考文献

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

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

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