准备
第一步就是安装R语言环境以及RStudio
图绘制准备
首先安装库文件,敲入指令，回车
install.packages('corrplot')
然后安装excel导入的插件，点击右上角import Dataset，选中From excel即可。
这些操作都很简单~~
数据预处理
然后到了数据输入了，这么多数据，我们总不能一行输入吧？那得有多蠢
于是我们利用上了数据导入功能，当当当~~
然而理想很丰满，现实却很蛋疼,导入的excel数据格式不是我们希望的矩阵格式ORZ！
哎，休息下喝杯茶，看看可能用到的指令吧。
假设导入的数据为data,那么可能用到的指令如下：
//查看数据
data
//删除矩阵第一行
data = data[-1,]
//删除矩阵第一列
data = data[,-1]
//data转换成矩阵
data = as.matrix(data)
//更改行名
row.names(data)<-c("OC","EC","SOC","NH4+","NO3","SO42")
指令在手，天下我有！
存在问题：导入数据格式问题
期望导入的数据格式是矩阵，如下图所示：
实际导入的数据格式如下图：
报警了~~
解决方案：导入数据转换成矩阵流程
然而山人自有妙计~~
-
data = data[,-1],删除第一列的多余数据,运行结果如下图
-
data = as.matrix(data),转变成矩阵，运行结果如下图
-
虽然变成矩阵了，但是第一列行名有问题。运行代码
row.names(data)<-c("OC","EC","SOC","NH4+","NO3","SO42")，运行结果如下图
数据绘图
数据变成矩阵后，运行如下指令，即可得到图片
library(corrplot)
corrplot(corr = data, method = 'color', order ="AOE", addCoef.col="grey")
运行结果如下图所示：
corrplot 的具体参数含义可以参考文献使用R语言绘制其他图形之相关系数图
然而参数好多啊。。。。
并不想看，我差不多是条咸鱼了。。。
继续撸参数，然后慢慢调节。。。
其中关于颜色的调整参数为col,参考文献An Introduction to corrplot Package
例如
col<- colorRampPalette(c("red","orange", "yellow","green","blue","purple"))(20)
corrplot(corr = data, method = 'color', order ="AOE", addCoef.col="grey",col=col)
运行结果如下：
但是零的部分很丑有木有，
因此需要调参~~
关于添加cl.lim参数以及type参数微调优化
col<- colorRampPalette(c("black","blue" ,"purple","green","yellow","orange","red","black","blue" ,"purple","green","yellow","orange","red"))(20)
corrplot(corr = data, method = 'color', order ="AOE", addCoef.col="grey",col=col,cl.lim = c(0,1),type="upper")
运行结果如下：
好了，到此为止基本上相对关系图就绘制完毕了O(∩_∩)O~~
如果想把图绘制的更加炫酷，强烈推荐自习阅读参考文献6，就酱=￣ω￣=
最后，修仙伤身====