使用R语言函数cor.test()做相关性计算和检验