试了一上午,终于弄好了!!!
我的需求:R语言相关性矩阵可视化上面显著性水平的星号个数不符合老师要求,自动生成的图如下所示:
这个图是用R语言PerformanceAnalytics包中的chart.correlation函数生成的,图上红色的星号代表显著性水平:
我的方法如下:
1.先从Cran The Comprehensive R Archive Network找到PerformanceAnalytics包,下载其源代码,从中找到chart.correlation函数的源代码,我只需要更改星号的个数,即只需要更改下列代码即可,具体如下所示:
# borrowed from printCoefmat
Signif <- symnum(test$p.value, corr = FALSE, na = FALSE,
cutpoints = c(0, 0.001, 0.01, 0.05, 1),
symbols = c("***", "**", "*", " "))
我更改后的源码如下所示:
# borrowed from printCoefmat
Signif <- symnum(test$p.value, corr = FALSE, na = FALSE,
cutpoints = c(0, 0.001, 0.01, 0.05),
symbols = c("***", "**", "*"))
2.保存后,在Console中输入:source("C:\\chart.Correlation.r") #“预装“函数,即"C:\\chart.Correlation.r"代表路径和文件包的名字
3.在Console中输入:chart.Correlation(数据名称),例如chart.Correlation(shuju),即出现更改显著性星号改变后的图了
在此感谢作者:科学网—用source函数代替繁冗的R语言打包过程 - 熊荣川的博文
另外还有一种方法是将源代码进行打包,参考如下:
R语言 打包流程-采坑无数终有果_AllenWDYing的博客-CSDN博客_r语言打包
R语言制作自己的R包,详细过程_jiyang_1的博客-CSDN博客_r语言制作包
这个过程比较复杂,不过有时间还是可以试试。