GGallyパッケージ psychパッケージ GGallyパッケージ library(ggplot2) library(GGally) dat6=subset(dat4,select = c(school,think1_pre,think1_post,eap_pre,eap_post,X4_8,Q2.8)) colnames(dat6) <- c("学校","思考プレ","思考ポスト","態度プレ","態度ポ…