数据框的多列如何两两比较作图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

数据格式如下：
ID        r1        r2        r3
1        68.46        65.86        65.08
2        38.89        37.61        39.09
3        59.2        63.34        28.33
4        27.3        20.33        24.11
5        15.24        18.77        1.79
6        66.97        35.46        0
7        62.94        56.82        79.53
8        32.49        25.61        0.53
9        57.69        36.33        20.36
10        26.6        17.58        39.25
11        17.4        15.62        1.47
12        37.26        51.14        67.65
13        12.52        19.26        11.97
源数据一共是31行34列，现在是想除了第一列之外，剩下的33列排列组合选取两列作图，比如1、2、3或者1、2、4等，我试着用1、3、5列画图：

1. data<-read.csv('C:/Users/elain/Desktop/ZDW_MET_1.csv',header=T)
   
2. #calculate Correlation coefficient
   
3. data1<-data[,-1]
   
4. cormat <- round(cor(data1,use="pairwise.complete.obs"),2)
   
5. 
   
6. # plot
   
7. test<-data[,c(1,3,5)]
   
8. test<-melt(test,id.vars = "ID",variable.name = "region",value.name = "methy")
   
9. test<-rename(test,c(ID="sample"))
   
10. test<-rename(test,c(variable="region"))
    
11. test<-rename(test,c(value="methy"))
    
12. test =na.omit(test)
    
13. labels = paste("P_value=",cormat[2,4])
    
14. ggplot(test, aes(x=sample, y=methy,colour=region)) +
    
15.   geom_point() +
    
16.   stat_smooth(method=lm,se=FALSE) +
    
17.   theme_classic() +
    
18.   annotate("text",x=-Inf,y=Inf,label=labels,hjust=-.2,vjust=2)
    
19. ggsave('C:/Users/elain/Desktop/r2_r4.png')

复制代码

这些数据两两组合有好多种，请问一下有没有什么函数可以快速达到目的，或者如果要循环，这种两两取列要怎么写呢

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据框 Data 数据格式

读取，然后设置数据的dim，