R
!!!相関のグラフ
{{outline}}
*サンプル dmu02shd
{{pre
> head(dmu02shd)
  SL      MHD      MDD
1  5 1.500000 1.500000
2  4 1.000000 2.000000
5  7 2.000000 1.500000
6  5 1.250000 1.750000
7  4 1.333333 1.666667
8  4 1.333333 1.333333
}}

!!plot() で散布図
*pairs() でも同じ
**オプション , panel = panel.smooth をつけると線を引いてくれる
{{pre
> pairs(dmu02shd, panel = panel.smooth)
}}
{{ref_image samplePairsSmooth.png}}

!!psychライブラリーを使う
{{pre
library(psych)
psych::pairs.panels(dmu02shd)
}}
{{ref_image samplePsych.png}}

!!PerformanceAnalyticsを使う
{{pre
library(PerformanceAnalytics)
chart.Correlation(dmu02shd)
}}
{{ref_image sampleChartCor.png}}

!!ggpairs()
{{pre
install.packages("GGally", dependencies=T)
library(ggplot2)
library(GGally)
ggpairs(dmu02shd)
}}
{{ref_image ggally.png}}