前提・実現したいこと
Rstudioでコレスポンデンス分析をしています。
ggplot2で結果をプロットするために下記サイトを参考に行と列の座標でデータフレームを作成しようとしたところ下記のエラーメッセージが発生しました。
(https://sugioka.wiki.fc2.com/wiki/R%E3%81%A7%E3%82%B3%E3%83%AC%E3%82%B9%E3%83%9D%E3%83%B3%E3%83%87%E3%83%B3%E3%82%B9%E5%88%86%E6%9E%90%E3%82%92%E3%81%99%E3%82%8B5%E3%81%A4%E3%81%AE%E9%96%A2%E6%95%B0)
発生している問題・エラーメッセージ
Error in data.frame(name2, aux2, rbind(ca1$rowcoord[, 1:2], ca1$colcoord[, :
引数に異なる列数のデータフレームが含まれています: 10, 22 該当のソースコード
install.packages("FactoMineR")
library(FactoMineR)
STORY = read.csv("cross2.csv",header = F,skip = 1,as.is = T,stringsAsFactors = F)
rownames(STORY)=c("物語1","物語2","物語3","物語4","物語5","物語6","物語7","物語8","物語9","物語10")
install.packages("ggplot2")
library(ggplot2)
install.packages("ca")
library(ca)
ca1=ca(STORY)
aux2 = c(rep("STORY",10), rep("STORY",12))
name2 = c(STORY, colnames(STORY))
auth_lets2 = data.frame(name2, aux2, rbind(ca1$rowcoord[,1:2], ca1$colcoord[,1:2]))
Error in data.frame(name2, aux2, rbind(ca1$rowcoord[, 1:2], ca1$colcoord[, :
引数に異なる列数のデータフレームが含まれています: 10, 22
【以下はcross2.csvのファイル内容です】
V1,V2,V3,V4,V5,V6,V7,V8,V9,V10,V11,V12
1,2,5,0,0,0,0,0,0,0,0,0
2,6,7,4,0,0,0,0,0,0,0,0
5,14,16,12,0,0,0,0,0,0,0,0
1,7,5,9,0,0,0,0,0,0,0,0
3,18,2,3,0,0,0,3,0,0,0,0
1,8,2,0,2,0,0,2,0,0,0,0
4,15,4,0,2,6,4,0,3,0,0,0
8,10,8,0,5,8,9,0,10,29,0,0
7,7,7,0,1,0,20,0,3,0,19,0
7,12,1,0,12,0,28,0,6,5,4,6-
気になる質問をクリップする
クリップした質問は、後からいつでもマイページで確認できます。
またクリップした質問に回答があった際、通知やメールを受け取ることができます。
クリップを取り消します
-
良い質問の評価を上げる
以下のような質問は評価を上げましょう
- 質問内容が明確
- 自分も答えを知りたい
- 質問者以外のユーザにも役立つ
評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。
質問の評価を上げたことを取り消します
-
評価を下げられる数の上限に達しました
評価を下げることができません
- 1日5回まで評価を下げられます
- 1日に1ユーザに対して2回まで評価を下げられます
質問の評価を下げる
teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。
- プログラミングに関係のない質問
- やってほしいことだけを記載した丸投げの質問
- 問題・課題が含まれていない質問
- 意図的に内容が抹消された質問
- 過去に投稿した質問と同じ内容の質問
- 広告と受け取られるような投稿
評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。
質問の評価を下げたことを取り消します
この機能は開放されていません
評価を下げる条件を満たしてません
質問の評価を下げる機能の利用条件
この機能を利用するためには、以下の事項を行う必要があります。
- 質問回答など一定の行動
-
メールアドレスの認証
メールアドレスの認証
-
質問評価に関するヘルプページの閲覧
質問評価に関するヘルプページの閲覧
0
エラーの直接的な原因は、作ろうとしているデータフレームの桁ごとの要素の数が揃っていない（10と22）点にあります。
data.frame(a=..., b=..., c=...)としたとき、a,b,cは完全に同じ長さのベクトルでなければなりません。ここでは引数にrbindが使われていますが、この場合はrbindの結果生成されるmatrixの行数が他の列データの要素数と揃っていなければなりません。
投稿
-
回答の評価を上げる
以下のような回答は評価を上げましょう
- 正しい回答
- わかりやすい回答
- ためになる回答
評価が高い回答ほどページの上位に表示されます。
-
回答の評価を下げる
下記のような回答は推奨されていません。
- 間違っている回答
- 質問の回答になっていない投稿
- スパムや攻撃的な表現を用いた投稿
評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。
15分調べてもわからないことは、teratailで質問しよう！
- ただいまの回答率 87.37%
- 質問をまとめることで、思考を整理して素早く解決
- テンプレート機能で、簡単に質問をまとめられる
質問への追記・修正、ベストアンサー選択の依頼
KojiDoi
2019/07/25 15:48
エラーが再現できるソースを示してください。掲出のソースでは検証できません。
SMV
2019/07/25 23:26
ご指摘ありがとうございます。ソースを追加したのでご覧いただけましたら幸いです。
KojiDoi
2019/07/26 01:16
auth_lets2 ですが、どんなデータフレームを作るつもりですか？ ちょっとこのdata.frame()は訳が分かりません。
SMV
2019/07/26 01:25
caの結果をggplot2を用いてプロットしたいため、グラフィックが作成できるデータフレームを作りたいです。（プロットするためのソース作成に下記URLのサイトの下部を参考にしたところエラーが出てしまっている状態です）
https://sugioka.wiki.fc2.com/wiki/R%E3%81%A7%E3%82%B3%E3%83%AC%E3%82%B9%E3%83%9D%E3%83%B3%E3%83%87%E3%83%B3%E3%82%B9%E5%88%86%E6%9E%90%E3%82%92%E3%81%99%E3%82%8B5%E3%81%A4%E3%81%AE%E9%96%A2%E6%95%B0
KojiDoi
2019/07/26 01:36
貴方のコードを拝見すると、そのお手本とは、aux2、name2の作り方が全然違っているのですが、そこは認識していますか？