给定两个数据框:
C1<-c(3,4,4,4,5)
C2<-c(3,7,3,4,5)
C3<-c(5,6,3,7,4)
DF<-data.frame(C1=C1,C2=C2,C3=C3)
DF
C1 C2 C3
1 3 3 5
2 4 7 6
3 4 3 3
4 4 4 7
5 5 5 4
并且
V1<-c(3,2,2,4,5)
V2<-c(3,7,3,5,2)
V3<-c(5,2,5,7,5)
V4<-c(1,1,2,3,4)
V5<-c(1,2,6,7,5)
DF2<-data.frame(V1=V1,V2=V2,V3=V3,V4=V4,V5=V5)
DF2
V1 V2 V3 V4 V5
1 3 3 5 1 1
2 2 7 2 1 2
3 2 3 5 2 6
4 4 5 7 3 7
5 5 2 5 4 5
观察两个数据框中每一行的对应关系,C3列中的数值与我想要在DF2中同一行中删除的列数之间存在着一种关系。
C3列中的数值与需要在DF2中删除的列数之间的关系如下所示:
If C3≥7 drop V5
If C3=6.0:6.9 drop V4 and up (so basically V5,V4)
If C3=5.0:5.9 drop V3 and up (so basically V5,V4,V3)
If C3=4.0:4.9 drop V2 and up (so basically V5,V4,V3,V2)
If C3≤3.9 drop entire row
例如,根据C3的值,我希望DF2看起来像这样:
V1 V2 V3 V4 V5
1 3 3
2 2 7 2
4 4 5 7 3
5 5
我尝试编写一个简单的脚本来实现这个功能(因为我还是个新手,所以喜欢保持简单,以便清楚地看到发生了什么),但是我一直在遇到各种错误,所以我希望能得到有关如何继续的建议。
DF
),当C3<=3.9
时。 - Subs