質問編集履歴
4
記載ミスの修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -76,7 +76,7 @@
|
|
|
76
76
|
|
|
77
77
|
得点=sc
|
|
78
78
|
|
|
79
|
-
aggregate(p2018$sc, by=list(p2018$name)
|
|
79
|
+
aggregate(p2018$sc, by=list(p2018$name), FUN=mean, na.rm = TRUE)
|
|
80
80
|
|
|
81
81
|
|
|
82
82
|
|
3
フォントの修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -52,7 +52,7 @@
|
|
|
52
52
|
|
|
53
53
|
dplyr::mutate(kt = 2)
|
|
54
54
|
|
|
55
|
-
|
|
55
|
+
・・・kt=9まで続く
|
|
56
56
|
|
|
57
57
|
現状このようなコードを書いた後、p2018と入力するとktの列があると出力されるのですが、csv形式で出力するとkt列が出力されていません。
|
|
58
58
|
|
2
フォントの修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -30,13 +30,13 @@
|
|
|
30
30
|
|
|
31
31
|
コード：
|
|
32
32
|
|
|
33
|
-
|
|
33
|
+
データ全体=p2018
|
|
34
34
|
|
|
35
|
-
|
|
35
|
+
1列目（果物）=ku りんごは0、みかんは1のような形式です
|
|
36
36
|
|
|
37
|
-
|
|
37
|
+
2列目（食べ方）=ta がむは0、ジュースは1のような形式です。
|
|
38
38
|
|
|
39
|
-
|
|
39
|
+
5列目（果物*食べ方）=kt
|
|
40
40
|
|
|
41
41
|
|
|
42
42
|
|
|
@@ -72,9 +72,9 @@
|
|
|
72
72
|
|
|
73
73
|
コード：
|
|
74
74
|
|
|
75
|
-
|
|
75
|
+
被験者名=name
|
|
76
76
|
|
|
77
|
-
|
|
77
|
+
得点=sc
|
|
78
78
|
|
|
79
79
|
aggregate(p2018$sc, by=list(p2018$name)
|
|
80
80
|
|
1
コードの追加
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -28,6 +28,36 @@
|
|
|
28
28
|
|
|
29
29
|
|
|
30
30
|
|
|
31
|
+
コード：
|
|
32
|
+
|
|
33
|
+
# データ全体=p2018
|
|
34
|
+
|
|
35
|
+
# 1列目（果物）=ku りんごは0、みかんは1のような形式です
|
|
36
|
+
|
|
37
|
+
# 2列目（食べ方）=ta がむは0、ジュースは1のような形式です。
|
|
38
|
+
|
|
39
|
+
# 5列目（果物*食べ方）=kt
|
|
40
|
+
|
|
41
|
+
|
|
42
|
+
|
|
43
|
+
p2018 %>%
|
|
44
|
+
|
|
45
|
+
dplyr::filter(p2018$ku == 0, p2018$ta == 0) %>%
|
|
46
|
+
|
|
47
|
+
dplyr::mutate(kt = 1)
|
|
48
|
+
|
|
49
|
+
p2018 %>%
|
|
50
|
+
|
|
51
|
+
dplyr::filter(p2018$ku == 0, p2018$ta == 1) %>%
|
|
52
|
+
|
|
53
|
+
dplyr::mutate(kt = 2)
|
|
54
|
+
|
|
55
|
+
#・・・kt=9まで続く
|
|
56
|
+
|
|
57
|
+
現状このようなコードを書いた後、p2018と入力するとktの列があると出力されるのですが、csv形式で出力するとkt列が出力されていません。
|
|
58
|
+
|
|
59
|
+
|
|
60
|
+
|
|
31
61
|
**☆教えて頂きたいこと2**
|
|
32
62
|
|
|
33
63
|
5列目（果物*食べ方）の9種類が被験者（3列目）ごとに平均何点なのかをクロス集計表で算出したいです。
|
|
@@ -40,6 +70,18 @@
|
|
|
40
70
|
|
|
41
71
|
|
|
42
72
|
|
|
73
|
+
コード：
|
|
74
|
+
|
|
75
|
+
# 被験者名=name
|
|
76
|
+
|
|
77
|
+
# 得点=sc
|
|
78
|
+
|
|
79
|
+
aggregate(p2018$sc, by=list(p2018$name)
|
|
80
|
+
|
|
81
|
+
|
|
82
|
+
|
|
83
|
+
とすると、被験者ごとの平均得点を求めることは出来たのですが、ここに5列目（果物*食べ方）の変数をどう追加すればよいのかが分かりません。
|
|
84
|
+
|
|
43
85
|
|
|
44
86
|
|
|
45
87
|
今までRはExcelで整理したデータを統計にかける程度で使っており、R上でデータ整理することは結構難しいと感じている次第です。
|