SLWRMemo のバックアップ(No.1) - 投野由紀夫授業用ホームページ

バックアップ一覧
差分を表示
現在との差分を表示
ソースを表示
SLWRMemo へ行く。

Chapter 1 †

p.5: Table 1

> TenseAspect <-matrix(c(12,7,19,6,13,19,18,20,38),3,3)
> TenseAspect
     [,1] [,2] [,3]
[1,]   12    6   18
[2,]    7   13   20
[3,]   19   19   38
> chisq.test(TenseAspect)
  
	Pearson's Chi-squared test

data:  TenseAspect 
X-squared = 3.8, df = 4, p-value = 0.4337