Rで相関行列を表示させたい

Question

Rで相関行列を出したいのですが、エラーが出ます。

x<-read.csv("/Users/masasuke-inno/Desktop/R_test.csv",header=TRUE,sep=",")

x

name gaiken huniki taio kocha kakaku teasence

1 abs1 5 5 5 4 4 2
2 abs2 5 4 5 2 2 2
3 abs3 4 4 4 4 4 4
4 abs4 2 3 4 3 3 3
5 abs5 3 3 3 3 4 1
6 abs6 5 4 5 3 2 3
7 abs7 5 5 5 4 5 5
8 abs8 3 1 2 5 4 4
9 abs9 4 1 3 3 2 3
10 abs10 1 2 2 2 2 2
11 abs11 3 2 3 1 1 1
12 abs12 4 3 4 4 3 4
13 abs13 3 2 3 4 5 5
14 abs14 4 3 4 5 4 5
15 abs15 2 2 3 5 5 4

以上のような6つの変数の相関行列を出そうとしたのですが、

x<-read.csv("/Users/masasuke-inno/Desktop/R_test.csv",header=TRUE,sep=",")

cor<-cor(x)

cor(x) でエラー: 'x' は数値でなければなりません

とエラーが出ます。クラスを確認してみたところ、

 name    gaiken    huniki      taio     kocha    kakaku  teasence 

"factor" "numeric" "numeric" "numeric" "numeric" "numeric" "numeric"

と出ました。
ここから具体的にどう修正すればいいのか教えてください。

Answer 1

cor<-cor(x)
cor(x) でエラー: 'x' は数値でなければなりません

データフレーム「x」の1列目「name」が数値ではないです。
ですから「x」全体で相関係数は計算できません。

データフレーム「x」から1列目「name」を除外してcor()に渡せばいいです。

カラム列の指定は c(列番号) が使えます。

たとえば2列目、3列目を取り出すなら

> x[c(2, 3)]
   gaiken huniki
1       5      5
2       5      4
3       4      4

たとえば1列目nameを除外するならマイナス指定します

> x[c(-1)]
   gaiken huniki taio kocha kakaku teasence
1       5      5    5     4      4        2
2       5      4    5     2      2        2
3       4      4    4     4      4        4

これで文字列のname列がなくなりましたの相関行列ができるのではないでしょうか？

> cor(x[c(-1)])
             gaiken      huniki       taio      kocha     kakaku    teasence
gaiken   1.00000000 0.650981239 0.80343355 0.10945214 0.01480223 0.141942936
huniki   0.65098124 1.000000000 0.88878531 0.02193678 0.18732689 0.008128201
taio     0.80343355 0.888785313 1.00000000 0.01916286 0.03524537 0.099405347
kocha    0.10945214 0.021936784 0.01916286 1.00000000 0.82331494 0.771099601
kakaku   0.01480223 0.187326886 0.03524537 0.82331494 1.00000000 0.644658371
teasence 0.14194294 0.008128201 0.09940535 0.77109960 0.64465837 1.000000000

Comments

[masa2020]

できました！！！
ありがとうございます！！！！！！！！！