teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

4

記載ミスの修正

2019/03/18 18:21

投稿

88yasu
88yasu

スコア13

title CHANGED
File without changes
body CHANGED
@@ -37,7 +37,7 @@
37
37
  コード:
38
38
  被験者名=name
39
39
  得点=sc
40
- aggregate(p2018$sc, by=list(p2018$name)
40
+ aggregate(p2018$sc, by=list(p2018$name), FUN=mean, na.rm = TRUE)
41
41
 
42
42
  とすると、被験者ごとの平均得点を求めることは出来たのですが、ここに5列目(果物*食べ方)の変数をどう追加すればよいのかが分かりません。
43
43
 

3

フォントの修正

2019/03/18 18:21

投稿

88yasu
88yasu

スコア13

title CHANGED
File without changes
body CHANGED
@@ -25,7 +25,7 @@
25
25
  p2018 %>%
26
26
  dplyr::filter(p2018$ku == 0, p2018$ta == 1) %>%
27
27
  dplyr::mutate(kt = 2)
28
- #・・・kt=9まで続く
28
+ ・・・kt=9まで続く
29
29
  現状このようなコードを書いた後、p2018と入力するとktの列があると出力されるのですが、csv形式で出力するとkt列が出力されていません。
30
30
 
31
31
  **☆教えて頂きたいこと2**

2

フォントの修正

2019/03/18 08:06

投稿

88yasu
88yasu

スコア13

title CHANGED
File without changes
body CHANGED
@@ -14,10 +14,10 @@
14
14
  現状:mutateやfilter関数を使うことまでは分かったのですが、どう書いていけばよいのか分かりません。
15
15
 
16
16
  コード:
17
- # データ全体=p2018
17
+ データ全体=p2018
18
- # 1列目(果物)=ku りんごは0、みかんは1のような形式です
18
+ 1列目(果物)=ku りんごは0、みかんは1のような形式です
19
- # 2列目(食べ方)=ta がむは0、ジュースは1のような形式です。
19
+ 2列目(食べ方)=ta がむは0、ジュースは1のような形式です。
20
- # 5列目(果物*食べ方)=kt
20
+ 5列目(果物*食べ方)=kt
21
21
 
22
22
  p2018 %>%
23
23
  dplyr::filter(p2018$ku == 0, p2018$ta == 0) %>%
@@ -35,8 +35,8 @@
35
35
  aggregateではなくdplyr関数を使った方が良いというような記載も見つけ、どうすれば良いかわからなくなっています。
36
36
 
37
37
  コード:
38
- # 被験者名=name
38
+ 被験者名=name
39
- # 得点=sc
39
+ 得点=sc
40
40
  aggregate(p2018$sc, by=list(p2018$name)
41
41
 
42
42
  とすると、被験者ごとの平均得点を求めることは出来たのですが、ここに5列目(果物*食べ方)の変数をどう追加すればよいのかが分かりません。

1

コードの追加

2019/03/18 08:06

投稿

88yasu
88yasu

スコア13

title CHANGED
File without changes
body CHANGED
@@ -13,12 +13,33 @@
13
13
 
14
14
  現状:mutateやfilter関数を使うことまでは分かったのですが、どう書いていけばよいのか分かりません。
15
15
 
16
+ コード:
17
+ # データ全体=p2018
18
+ # 1列目(果物)=ku りんごは0、みかんは1のような形式です
19
+ # 2列目(食べ方)=ta がむは0、ジュースは1のような形式です。
20
+ # 5列目(果物*食べ方)=kt
21
+
22
+ p2018 %>%
23
+ dplyr::filter(p2018$ku == 0, p2018$ta == 0) %>%
24
+ dplyr::mutate(kt = 1)
25
+ p2018 %>%
26
+ dplyr::filter(p2018$ku == 0, p2018$ta == 1) %>%
27
+ dplyr::mutate(kt = 2)
28
+ #・・・kt=9まで続く
29
+ 現状このようなコードを書いた後、p2018と入力するとktの列があると出力されるのですが、csv形式で出力するとkt列が出力されていません。
30
+
16
31
  **☆教えて頂きたいこと2**
17
32
  5列目(果物*食べ方)の9種類が被験者(3列目)ごとに平均何点なのかをクロス集計表で算出したいです。
18
33
 
19
34
  現状:クロス集計をして度数を算出する方法はいくつか見つけました。aggregate関数を使い、被験者ごとの平均得点を求めることは出来たのですが、そこに”果物*食べ方”をクロスさせる方法が分かりません。
20
35
  aggregateではなくdplyr関数を使った方が良いというような記載も見つけ、どうすれば良いかわからなくなっています。
21
36
 
37
+ コード:
38
+ # 被験者名=name
39
+ # 得点=sc
40
+ aggregate(p2018$sc, by=list(p2018$name)
22
41
 
42
+ とすると、被験者ごとの平均得点を求めることは出来たのですが、ここに5列目(果物*食べ方)の変数をどう追加すればよいのかが分かりません。
43
+
23
44
  今までRはExcelで整理したデータを統計にかける程度で使っており、R上でデータ整理することは結構難しいと感じている次第です。
24
45
  どなたか教えて頂くことは出来ませんでしょうか。