기본 함수인 pairs로 상관관계를 시각화한다. 데이터는 mtcars data에서 수치형 데이터인 mpg, disp, hp, drat, wt,qsec를 쓴다. cyl을 그룹으로 활용한다.
# 샘플 데이터
data <- mtcars[, c(1,3,4,5,6,7)]
group <- as.factor(mtcars[, c(2)])
# Plot correlation matrix
pairs(data,
pch = 21, bg = c("red", "green3", "blue")[group],
main = "mtcars data by cyl",
panel = panel.smooth)