我有个4列的文档如下:
<br />
R-185 SIX1 -0.355520013549699 0.053849818409879<br />
R-138 EGFL7 0.0504840263444323 0.79106202307383<br />
R-10A NFKBIA -0.0573663730902907 0.763334156197386<br />
第三列是correlation的r 值, 第4列是p-value, 想对第4列做BH校正,请问我写的这个代码有问题没</p>
<br />
rm(list=ls()) ###清空内存中的变量</p>
<p>a<-read.csv("test.txt",sep="\t",header=F,quote="") ###读文件到矩阵中去</p>
<p>b<-a[order(a[,4],decreasing=TRUE),] ###按第4列,从大到小排序,因为BH本身要排序,这里排序是为了保证前几列和后面的对应</p>
<p>b[,5]<-p.adjust(b[,4],method="BH") ###做BH校正,将校正后的值加到第五列</p>
<p>c<-b[which(b[,5]<0.001),] ###按第5列取值</p>
<p>write.table(c,"zz.txt",sep="\t",col.names=F,row.names=F,quote=F)<br />
</p>