R
lattice
mtcars

Rで相関係数のプロットをキレイに描く

More than 3 years have passed since last update.

コード

R
library(lattice)

# 相関係数の絶対値
mtcars.cor <- abs(cor(mtcars))
# 同じ変数同士は相関係数が1になるので、グラフの見易さの為に0を代入
diag(mtcars.cor) <- 0
# カラーパレットを作成
mtcars.palette <- colorRampPalette(c("white", "yellow", "orange", "red"), space = "rgb")
# プロット
levelplot(mtcars.cor, col.regions=mtcars.palette(120), xlab="", ylab="", 
          colorkey=list(space="bottom", width=0.5, labels=list(cex=0.9)), 
          aspect="fill", main="Motor cars feature correlation", scales=list(cex=0.9))

結果

mcars_corr.png