hugebear 发表于 2013-6-11 13:33 
把数据和你的程序运行结果贴出来胜于千言万语。。。。
#读入数据#请注意把附件数据的扩展名改为csv,因为论坛不让上传csv格式的文件,故楼主改成了xls
testdata <- read.csv("test.csv")
testdata
#ltm包及相关检验
library(ltm)
#临时数据框
testmat <- cbind(height = testdata$height, shoe = testdata$shoe, hand = testdata$hand)
#相关检验
rcor.test(testmat)
以上代码执行后会得到如下结果:
height shoe hand
height ***** 0.867 0.574
shoe <0.001 ***** 0.516
hand 0.001 0.004 *****
upper diagonal part contains correlation coefficient estimates
lower diagonal part contains corresponding p-values
我想要的输出形式是:
height和shoe显著相关,相关系数是0.867;
height和hand显著相关,相关系数是0.574;
shoe和hand显著相关,相关系数是0.516。
因为现在变量少还好,如果变量很多,即便是相关分析得到的表格装得下,看起来也不方便,如果可以用文字的形式把显著相关的变量及其系数列出来,似乎更有利于信息的传达,尤其是给非专业人士看的时候。故有此问。希望大家可以指点在下一二。