Transcript PowerPoint
タレントの魅力測定とその分析 評定の概要 8人のアイドル・タレントを、右の評定用フォームを用い、評定した。評定項目は、 「かわいい」、「美しい」、「セク シー」、「おもしろい」の4つを用い、「全く当てはまらない」から「非常にあてはまる」の5段階スケールとした。 http://kodamalab.sakura.ne.jp/nagano/PIP1/question1.php 評定結果データのダウンロード FireFoxを使って、 http://kodamalab.sakura.ne.jp/nagano/PIP1/ にアクセスし、alldata.csv をデスクトップに保存 する。 ダウロードマネージャが出るので、デスクトップ にドラッグアンドドロップする。 alldata.csv をダブルクリックすると、以下のようなデータになっている。 Ctrl+Aで全データを選択したら、データタブ→並べ替え→優先されるキーを性別に設定し、OKを押そう。 データが男女別に並べ替えられる。 このデータは、女性28名、男性13名ぶん、8人のタレント×4質問=計32項目のデータであることがわかる。 (Q1:かわいい、Q2:美しい、Q3:セクシー、Q4:おもしろい) 各タレントのレーダーチャート(全体) タレント0 お も し ろ い お も し ろ い 5 4 3 2 1 0 タレント1 か わ い い 美 し い お も し ろ い 5 4 3 2 1 0 タレント2 か わ い い 美 し い お も し ろ い 5 4 3 2 1 0 か わ い い 美 し い セ ク シ ー セ ク シ ー セ ク シ ー タレント4 タレント5 タレント6 か わ い い か わ い い か わ い い 5 4 3 2 1 0 美 し い セ ク シ ー お も し ろ い 5 4 3 2 1 0 美 し い セ ク シ ー お も し ろ い 5 4 3 2 1 0 タレント3 美 し い セ ク シ ー タレント7 美 し い セ ク シ ー お も し ろ い 5 4 3 2 1 0 か わ い い お も し ろ い 5 4 3 2 1 0 か わ い い 美 し い セ ク シ ー 各タレントのレーダーチャート(男女別) タレント0 お も し ろ い タレント1 男 女 か わ い 5 い 4 3 2 1 0 お も し ろ い 美 し い セ ク シ ー お も し ろ い セ ク シ ー 男 女 お も し ろ い 美 し い セ ク シ ー タレント4 か わ い 5 い 4 3 2 1 0 か わ い 5 い 4 3 2 1 0 タレント2 美 し い お も し ろ い か わ い 5 い 4 3 2 1 0 セ ク シ ー 男 女 お も し ろ い 美 し い セ ク シ ー タレント5 男 女 か わ い 5 い 4 3 2 1 0 タレント3 美 し い お も し ろ い か わ い 5 い 4 3 2 1 0 セ ク シ ー 男 女 美 し い セ ク シ ー タレント6 男 女 か わ い 5 い 4 3 2 1 0 タレント7 男 女 美 し い お も し ろ い か わ い 5 い 4 3 2 1 0 セ ク シ ー 男 女 美 し い 項目別各タレントの評定値 5 5 かわいい 美しい 4 4 3 3 2 2 1 1 0 0 Q01 5 Q11 Q21 Q31 Q41 Q51 Q61 Q71 Q02 5 セクシー 4 4 3 3 2 2 1 1 0 Q12 Q22 Q32 Q42 Q52 Q62 Q72 Q24 Q34 Q44 Q54 Q64 Q74 おもしろい 0 Q03 Q13 Q23 Q33 Q43 Q53 Q63 Q73 Q04 Q14 5 平均評定値を用いた散布図 タレント別各項目の平均評定値 タレント0 タレント1 タレント2 タレント3 タレント4 タレント5 タレント6 タレント7 5 相関係数:0.78 相関係数:0.81 か わ い い かわいい 美しい セクシー おもしろい 2.88 2.31 2.11 1.73 3.05 2.62 2.60 2.81 3.02 2.09 1.84 1.96 2.50 2.18 2.34 2.03 2.29 1.80 1.65 2.90 3.02 3.26 2.64 2.44 2.29 2.08 1.95 2.89 3.32 3.27 3.08 2.21 4 4 3 か わ 3 い い 2 2 1 1 1 2 3 4 5 1 2 美しい 5 5 相関係数:-0.13 相関係数:-0.37 4 4 美 3 し い 3 2 2 1 1 1 2 3 4 5 1 2 おもしろい 3 4 5 おもしろい 5 5 相関係数:-0.10 相関係数:0.93 4 美 し い 4 セクシー 5 か わ い い 3 4 セ ク シ ー 3 2 1 3 2 1 1 2 3 セクシー 4 5 1 2 3 おもしろい 4 5 タレント0 タレント1 タレント2 タレント3 タレント4 タレント5 タレント6 タレント7 かわいい Q01 5 4 3 2 1 0 男 Q11 5 4 3 2 1 0 女 男 Q21 5 4 3 2 1 0 女 男 Q31 5 4 3 2 1 0 女 男 Q41 5 4 3 2 1 0 女 男 Q51 5 4 3 2 1 0 女 男 Q61 5 4 3 2 1 0 女 男 Q71 5 4 3 2 1 0 女 男 女 美しい Q02 5 4 3 2 1 0 男 Q12 5 4 3 2 1 0 女 男 Q22 5 4 3 2 1 0 女 男 Q32 5 4 3 2 1 0 女 男 Q42 5 4 3 2 1 0 女 男 Q52 5 4 3 2 1 0 女 男 Q62 5 4 3 2 1 0 女 男 Q72 5 4 3 2 1 0 女 男 女 セクシー Q03 5 4 3 2 1 0 男 Q13 5 4 3 2 1 0 女 男 Q23 5 4 3 2 1 0 女 男 Q33 5 4 3 2 1 0 女 男 Q43 5 4 3 2 1 0 女 男 Q53 5 4 3 2 1 0 女 男 Q63 5 4 3 2 1 0 女 男 Q73 5 4 3 2 1 0 女 男 女 おもしろい Q04 5 4 3 2 1 0 男 女 Q14 5 4 3 2 1 0 男 女 Q24 5 4 3 2 1 0 男 女 Q34 5 4 3 2 1 0 男 女 Q44 5 4 3 2 1 0 男 女 Q54 5 4 3 2 1 0 男 女 Q64 5 4 3 2 1 0 男 女 Q74 5 4 3 2 1 0 男 女 エクセルデータをSASへインポートし分析する t検定用のデータを作成する 1.エクセルのワークシートか ら、データ部分だけを選択し コピーする。 ← 2.TeraPadに貼り付け、ファイ ルメニュー→文字/改行コー ド指定保存で、 文字コードをEUC 改行コードをLF にして、data.txtという名前で 保存する。 対応のないt検定(男女で評定結果を比較) /*データの読み込み*/ options ls=80; data nagano; infile 'data.txt' dlm='09'x; input subject $ sex $ q01-q04 q11-q14 q21-q24 q31-q34 q41-q44 q51-q54 q61-q64 q71-q74; /*データのソート*/ proc sort; by sex; ←のプログラムをコピーし、Terapadに貼り付 ける。ファイルメニュー→文字/改行コード指 定保存で、 文字コードをEUC 改行コードをLF にして、 akbT1.sasという名前で保存する。 /*対応のないt検定 タレント1でかわいさに男女差はあるか?*/ proc ttest; class sex; var q11; /*対応のないt検定 タレント1で美しさに男女差はあるか?*/ proc ttest; class sex; var q12; /*対応のないt検定 タレント1でセクシーさに男女差はあるか?*/ proc ttest; class sex; var q13; /*対応のないt検定 タレント1で面白さに男女差はあるか?*/ proc ttest; class sex; var q14; run; お も し ろ い か わ い 5 い 4 3 2 1 0 男 女 美 し い セ ク シ ー タレント1に関し、男女で評価が分かれそう なのは、どの項目か? q11:タレント1のかわいさ SAS システム q12:タレント1の美しさ 1 2012年12月11日 火曜日 午後03時20分36秒 sex m ア・ Diff (1-2) SAS システム 2 2012年12月11日 火曜日 午後03時20分36秒 TTEST プロシジャ TTEST プロシジャ 変数: q11 変数: q12 N 平均 標準偏差 標準誤差 最小値 最大値 sex 13 28 2.5385 3.5714 -1.0330 1.1983 1.3452 1.3018 0.3323 0.2542 0.4369 1.0000 1.0000 4.0000 5.0000 m ア・ Diff (1-2) sex 手法 m ア・ Diff (1-2) Diff (1-2) Pooled Satterthwaite sex 平均 95% 平均の信頼限 界 2.5385 3.5714 -1.0330 -1.0330 1.8143 3.2626 3.0498 4.0930 -1.9167 -0.1493 -1.8928 -0.1732 1.1983 1.3452 1.3018 Pooled Satterthwaite 0.8593 1.0635 1.0663 平均 標準偏差 標準誤差 最小値 最大値 13 28 2.3846 2.8571 -0.4725 1.4456 1.0440 1.1822 0.4009 0.1973 0.3968 1.0000 1.0000 5.0000 4.0000 sex 手法 m ア・ Diff (1-2) Diff (1-2) 95% 標準偏差の信頼 限界 手法 m ア・ Diff (1-2) Diff (1-2) 標準偏差 N 分散 自由度 t 値 Pr > |t| Pooled Satterthwaite Equal Unequal 39 26.169 -2.36 -2.47 0.0231 0.0204 Pooled Satterthwaite Folded F 1.5111 2.4523 -1.2751 -1.4112 標準偏差 3.2582 3.2620 0.3300 0.4661 1.4456 1.0440 1.1822 1.0366 0.8254 0.9684 2.3863 1.4210 1.5180 手法 分散 自由度 t 値 Pr > |t| Pooled Satterthwaite Equal Unequal 39 18.045 -1.19 -1.06 0.2409 0.3043 等分散性 手法 95% 平均の信頼限 界 95% 標準偏差の信頼 限界 手法 m ア・ Diff (1-2) Diff (1-2) 手法 2.3846 2.8571 -0.4725 -0.4725 Pooled Satterthwaite sex 1.9781 1.8310 1.6715 平均 等分散性 分子の自由度 分母の自由度 F 値 Pr > F 手法 27 12 1.26 0.6933 Folded F タレント1に関して、男女のかわいさ評定値に差があるかを、対応のない t検定を用い検討したところ、t(39)=2.36, p<.05となり、5%水準で有意な差 がみとめられた。 したがって、タレント1のかわいさ評定値は、女性において有意に高い事 がわかった。 分子の自由度 分母の自由度 F 値 Pr > F 12 27 1.92 0.1564 タレント1に関して、男女の美しさ評定値に差があるかを、対応のないt検 定を用い検討したところ、t(39)=1.19, n.s.となり、有意な差はみとめられな かった。 したがって、タレント1の美しさ評定値には男女で差がないことがわかっ た。 q13:タレント1のセクシーさ q14:タレント1の面白さ SAS システム 3 2012年12月11日 火曜日 午後03時20分36秒 sex m ア・ Diff (1-2) SAS システム 4 2012年12月11日 火曜日 午後03時20分36秒 TTEST プロシジャ TTEST プロシジャ 変数: q13 変数: q14 N 平均 標準偏差 標準誤差 最小値 最大値 sex 13 28 2.2308 2.9643 -0.7335 1.1658 1.3189 1.2737 0.3233 0.2492 0.4275 1.0000 1.0000 5.0000 5.0000 m ア・ Diff (1-2) sex 手法 m ア・ Diff (1-2) Diff (1-2) 平均 2.2308 2.9643 -0.7335 -0.7335 Pooled Satterthwaite sex 1.5263 2.4529 -1.5982 -1.5721 標準偏差 2.9352 3.4757 0.1311 0.1051 1.1658 1.3189 1.2737 Pooled Satterthwaite 0.8359 1.0427 1.0434 平均 標準偏差 標準誤差 最小値 最大値 13 28 2.6154 3.0000 -0.3846 0.9608 1.2172 1.1444 0.2665 0.2300 0.3841 1.0000 1.0000 4.0000 5.0000 sex 手法 m ア・ Diff (1-2) Diff (1-2) 95% 標準偏差の信頼 限界 手法 m ア・ Diff (1-2) Diff (1-2) 95% 平均の信頼限 界 N 分散 自由度 t 値 Pr > |t| Pooled Satterthwaite Equal Unequal 39 26.362 -1.72 -1.80 0.0941 0.0838 Pooled Satterthwaite Folded F 2.0348 2.5280 -1.1615 -1.1042 標準偏差 3.1960 3.4720 0.3923 0.3350 0.9608 1.2172 1.1444 0.6890 0.9623 0.9375 1.5860 1.6567 1.4695 手法 分散 自由度 t 値 Pr > |t| Pooled Satterthwaite Equal Unequal 39 29.313 -1.00 -1.09 0.3228 0.2835 等分散性 手法 95% 平均の信頼限 界 95% 標準偏差の信頼 限界 手法 m ア・ Diff (1-2) Diff (1-2) 手法 2.6154 3.0000 -0.3846 -0.3846 Pooled Satterthwaite sex 1.9243 1.7952 1.6355 平均 等分散性 分子の自由度 分母の自由度 F 値 Pr > F 手法 27 12 1.28 0.6711 Folded F タレント1に関して、男女のセクシーさ評定値に差があるかを、対応のな いt検定を用い検討したところ、t(39)=1.72, n.s.となり、有意な差はみとめら れなかった。 したがって、タレント1のセクシーさ評定値には男女で差がないことがわ かった。 分子の自由度 分母の自由度 F 値 Pr > F 27 12 1.60 0.3917 タレント1に関して、男女の面白さ評定値に差があるかを、対応のないt 検定を用い検討したところ、t(39)=1.00, n.s.となり、有意な差はみとめられ なかった。 したがって、タレント1の面白さ評定値には男女で差がないことがわかっ た。 対応のあるt検定(タレントごとに評定値を比較) /*データの読み込み*/ options ls=80; data nagano; infile 'data.txt' dlm='09'x; input subject $ sex $ q01-q04 q11-q14 q21-q24 q31-q34 q41-q44 q51-q54 q61-q64 q71-q74; ←のプログラムをコピーし、Terapadに貼り付 ける。ファイルメニュー→文字/改行コード指 定保存で、 文字コードをEUC 改行コードをLF /*対応のあるt検定 タレント6と7でかわいさに差はあるか?*/ proc ttest; paired q61*q71; にして、 akbT2.sasという名前で保存する。 /*対応のあるt検定 タレント5と7でかわいさに差はあるか?*/ proc ttest; paired q51*q71; 5 /*対応のあるt検定 タレント0と1で面白さに差はあるか?*/ proc ttest; paired q04*q14; /*対応のあるt検定 タレント1と4で面白さに差はあるか?*/ proc ttest; paired q14*q44; かわいさ 4 3 2 1 0 Q01 Q11 Q21 Q31 Q41 Q51 Q61 Q71 Q64 Q74 run; おもしろさ 5 自分で比較したい部分を選定し、プログラムを作成する! 4 3 2 1 0 Q04 Q14 Q24 Q34 Q44 Q54 q51-q71:タレント5-7間でかわいさ比較 q61-q71:タレント6-7間でかわいさ比較 SAS システム 1 2012年12月11日 火曜日 午後03時17分22秒 SAS システム 2 2012年12月11日 火曜日 午後03時17分22秒 TTEST プロシジャ TTEST プロシジャ 差: q61 - q71 差: q51 - q71 N 平均 標準偏差 標準誤差 最小値 最大値 N 平均 標準偏差 標準誤差 最小値 最大値 41 -1.0732 1.1487 0.1794 -3.0000 2.0000 41 -0.3171 1.2337 0.1927 -3.0000 3.0000 平均 95% 平均の信頼限 界 標準偏差 -1.0732 -1.4357 -0.7106 1.1487 95% 標準偏差の信頼 限界 0.9431 平均 1.4698 -0.3171 95% 平均の信頼限 界 -0.7065 標準偏差 0.0723 95% 標準偏差の信頼 限界 1.2337 自由度 t 値 Pr > |t| 自由度 t 値 Pr > |t| 40 -5.98 <.0001 40 -1.65 0.1077 かいわいさ評定値に関して、タレント6とタレント7の間に差があるかを対 応のあるt検定により検討したところ、t(40)=5.98, p<.01となり、1%水準で有 意な差がみとめられた。 したがって、タレント7のかわいさ評定値が、タレント6のかわいさ評定値 に比べ有意に高いことがわかった。 5 4 3 2 1 0 Q11 Q21 Q31 1.5785 かいわいさ評定値に関して、タレント5とタレント7の間に差があるかを対 応のあるt検定により検討したところ、t(40)=1.65, n.s.となり、有意な差がみ とめられなかった。 したがって、タレント5とタレント7のかわいさ評定値には差がないことが わかった。 かわいさ Q01 1.0129 Q41 Q51 Q61 Q71 グラフと統計処理結果が対応しているか確認! q14-q44:タレント1-4間で面白さ比較 q04-q14:タレント0-1間で面白さ比較 SAS システム 3 2012年12月11日 火曜日 午後03時17分22秒 SAS システム 4 2012年12月11日 火曜日 午後03時17分22秒 TTEST プロシジャ TTEST プロシジャ 差: q04 - q14 差: q14 - q44 N 平均 標準偏差 標準誤差 最小値 最大値 N 平均 標準偏差 標準誤差 最小値 最大値 41 -1.1951 1.2494 0.1951 -4.0000 2.0000 41 -0.1220 0.8716 0.1361 -2.0000 2.0000 平均 95% 平均の信頼限 界 標準偏差 -1.1951 -1.5895 -0.8008 1.2494 95% 標準偏差の信頼 限界 1.0258 平均 1.5986 -0.1220 95% 平均の信頼限 界 -0.3971 標準偏差 0.1532 95% 標準偏差の信頼 限界 0.8716 自由度 t 値 Pr > |t| 自由度 t 値 Pr > |t| 40 -6.13 <.0001 40 -0.90 0.3757 面白さ評定値に関して、タレント0とタレント1の間に差があるかを対応の あるt検定により検討したところ、t(40)=6.13, p<.01となり、1%水準で有意な 差がみとめられた。 したがって、タレント1の面白さ評定値が、タレント0の面白さ評定値に比 べ有意に高いことがわかった。 おもしろさ 4 3 2 1 0 Q14 Q24 Q34 1.1153 面白さ評定値に関して、タレント1とタレント4の間に差があるかを対応の あるt検定により検討したところ、t(40)=0.90, n.s.となり、有意な差がみとめ られなかった。 したがって、タレント1とタレント4の面白さ評定値には差がないことがわ かった。 5 Q04 0.7156 Q44 Q54 Q64 Q74 グラフと統計処理結果が対応しているか確認! 相関係数計算用のデータを作成する 1.エクセルのワークシートから、 データ部分だけを選択しコピーする。 ← 2.TeraPadに貼り付け、 ファイルメニュー→文字/改行コード指定保存 で、 文字コードをEUC 改行コードをLF にして、data2.txtという名前で保存する。 各評定平均値どうしの相関を求める /*データの読み込み*/ options ls=80; data nagano; infile 'data2.txt' dlm='09'x; input subject $ kawaii utukushii sexy omoshiroi; /*総当りで相関を計算する*/ proc corr; var kawaii utukushii sexy omoshiroi; run; ←のプログラムをコピーし、Terapadに貼り付ける。ファイル メニュー→文字/改行コード指定保存で、 文字コードをEUC 改行コードをLF にして、 akbCORR.sasという名前で保存する。 相関係数の計算結果 SAS システム 5 1 2012年12月17日 月曜日 午後01時55分16秒 か わ い い CORR プロシジャ 4 変数 : kawaii utukushii sexy omoshiroi 要約統計量 N 平均 標準偏差 合計 最小値 最大値 kawaii utukushii sexy omoshiroi 8 8 8 8 2.89250 2.50375 2.29875 2.37750 0.42250 0.60469 0.55109 0.54917 23.14000 20.03000 18.39000 19.02000 2.34000 1.80000 1.61000 1.68000 3.46000 3.41000 3.20000 3.05000 Pearson の相関係数, N = 8 H0: Rho=0 に対する Prob > |r| kawaii utukushii sexy omoshiroi 1.00000 0.81432 0.0139 0.78181 0.0219 -0.37031 0.3665 utukushii 0.81432 0.0139 1.00000 0.92929 0.0008 -0.13199 0.7554 sexy 0.78181 0.0219 0.92929 0.0008 1.00000 -0.10343 0.8074 -0.37031 0.3665 -0.13199 0.7554 -0.10343 0.8074 omoshiroi 4 か わ い い 3 2 1 変数 kawaii 5 相関係数:0.81 1.00000 かわいい、美しい、セクシー、面白いの4つの評定平均値に関し、相関係 数を算出した。その結果、 かわいいと美しいの間に、5%水準で有意な正の相関(r=0.81)が、 かわいいとセクシーの間に、5%水準で有意な正の相関(r=0.78)が、 美しいとセクシーの間に、1%水準で有意な正の相関(r=0.93)が、 見られた。その他の評定値の間には、有意な相関関係はみられなかっ た。 したがって、かわいい、美しい、セクシーの各評定値は密接に関係してお り、特に評定者は美しさとセクシー差を、ほとんど同じようにとらえている 事がわかった。 相関係数:0.78 4 3 2 1 1 3 5 1 美しい 5 か わ い い 5 セクシー 5 相関係数:-0.37 4 4 3 美 3 し い 2 2 1 相関係数:-0.13 1 1 3 5 1 おもしろい 5 3 5 おもしろい 5 相関係数:0.93 4 美 し い 3 相関係数:-0.10 4 セ ク シ ー 3 2 1 3 2 1 1 3 セクシー 5 1 3 おもしろい 散布図と相関係数の対応を確認せよ! 5