質問編集履歴

1

「該当のソースコード」部分の内容を変更しました

2019/07/25 14:26

投稿

SMV
SMV

スコア12

test CHANGED
File without changes
test CHANGED
@@ -1,4 +1,4 @@
1
- __イタリックテキスト__### 前提・実現したいこと
1
+ ### 前提・実現したいこと
2
2
 
3
3
  Rstudioでコレスポンデンス分析をしています。
4
4
 
@@ -30,37 +30,17 @@
30
30
 
31
31
  ```R
32
32
 
33
- STORY 
33
+ install.packages("FactoMineR")
34
34
 
35
-     V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
36
-
37
- 物語1 1 2 5 0 0 0 0 0 0 0 0 0
38
-
39
- 物語2 6 7 4 0 0 0 0 0 0 0 0
40
-
41
- 物語3 5 14 16 12 0 0 0 0 0 0 0 0
42
-
43
- 物語4 1 7 5 9 0 0 0 0 0 0 0 0
44
-
45
- 物語5 3 18 2 3 0 0 0 3 0 0 0 0
46
-
47
- 物語6 1 8 2 0 2 0 0 2 0 0 0 0
48
-
49
- 物語7 4 15 4 0 2 6 4 0 3 0 0 0
50
-
51
- 物語8 8 10 8 0 5 8 9 0 10 29 0 0
52
-
53
- 物語9 7 7 7 0 1 0 20 0 3 0 19 0
54
-
55
- 物語10 7 12 1 0 12 0 28 0 6 5 4 6
56
-
57
-
58
-
59
- ca1 = ca(STORY)
35
+ library(FactoMineR)
60
36
 
61
37
 
62
38
 
63
- #ggplot2をロードする
39
+ STORY = read.csv("cross2.csv",header = F,skip = 1,as.is = T,stringsAsFactors = F)
40
+
41
+ rownames(STORY)=c("物語1","物語2","物語3","物語4","物語5","物語6","物語7","物語8","物語9","物語10")
42
+
43
+
64
44
 
65
45
  install.packages("ggplot2")
66
46
 
@@ -68,12 +48,48 @@
68
48
 
69
49
 
70
50
 
71
- #行と列の座標でデータフレームを作成する
51
+ install.packages("ca")
72
52
 
73
- aux = c(rep("STORY",10), rep("STORY",12))
53
+ library(ca)
74
54
 
75
- name = c(STORY, colnames(STORY))
55
+ ca1=ca(STORY)
76
56
 
57
+
58
+
59
+ aux2 = c(rep("STORY",10), rep("STORY",12))
60
+
61
+ name2 = c(STORY, colnames(STORY))
62
+
77
- auth_lets = data.frame(name, aux, rbind(ca1$rowcoord[,1:2], ca1$colcoord[,1:2]))
63
+ auth_lets2 = data.frame(name2, aux2, rbind(ca1$rowcoord[,1:2], ca1$colcoord[,1:2]))
64
+
65
+ Error in data.frame(name2, aux2, rbind(ca1$rowcoord[, 1:2], ca1$colcoord[, :
66
+
67
+ 引数に異なる列数のデータフレームが含まれています: 10, 22
68
+
69
+
70
+
71
+ 【以下はcross2.csvのファイル内容です】
72
+
73
+ V1,V2,V3,V4,V5,V6,V7,V8,V9,V10,V11,V12
74
+
75
+ 1,2,5,0,0,0,0,0,0,0,0,0
76
+
77
+ 2,6,7,4,0,0,0,0,0,0,0,0
78
+
79
+ 5,14,16,12,0,0,0,0,0,0,0,0
80
+
81
+ 1,7,5,9,0,0,0,0,0,0,0,0
82
+
83
+ 3,18,2,3,0,0,0,3,0,0,0,0
84
+
85
+ 1,8,2,0,2,0,0,2,0,0,0,0
86
+
87
+ 4,15,4,0,2,6,4,0,3,0,0,0
88
+
89
+ 8,10,8,0,5,8,9,0,10,29,0,0
90
+
91
+ 7,7,7,0,1,0,20,0,3,0,19,0
92
+
93
+ 7,12,1,0,12,0,28,0,6,5,4,6
78
94
 
79
95
  ```