前回の分析では、消費者態度指数は、5月の平均値が一番高く、12月の平均値が一番低いことがわかりました。
しかし、5月の平均値は42.4733、12月の平均値は40.2000という違いでした。この違いは有意な差といえるのでしょうか？調べてみましょう。
まずは、csvファイルのデータをR言語にread.csv関数で読み込ませます。
summary関数でデータのサマリーを表示しました。
次にsubset関数で5月だけのデータフレームを作成し、平均値をapply関数とmean関数を組み合わせて算出しました。
同じように12月の平均値も算出します。
それぞれの指数の値を確認しましょう。
データの数は5月は15個、12月は14個と少ないので、平均値の検定ではなくて、中央値に差があるかの検定をします。
それぞれの中央値をmedian関数で算出します。
５月の中央値は42.7で、12月の中央値は40.1です。
２つの中央値の検定は、ウィルコクソン=マン・ホイットニー検定です。関数は、wilcox.test関数です。
p-value = 0.2517 > 0.05 なので帰無仮説「5月と12月の中央値は同じ」を棄却できませんでした。
つまり、5月の中央値と12月の中央値は異なっていると言い切ることはできませんでした。
