小编NMc*_*NMc的帖子

我试图在遇到该列的最大值后,在数据框中找到满足某个条件的列的观察数.

这是一个高度简化的例子:

fake.dat<-data.frame(samp1=c(5,6,7,5,4,5,10,5,6,7), samp2=c(2,3,4,6,7,9,2,3,7,8), samp3=c(2,3,4,11,7,9,2,3,7,8),samp4=c(5,6,7,5,4,12,10,5,6,7))

       samp1 samp2 samp3 samp4
1      5     2     2     5
2      6     3     3     6
3      7     4     4     7
4      5     6    11     5
5      4     7     7     4
6      5     9     9    12
7     10     2     2    10
8      5     3     3     5
9      6     7     7     6
10     7     8     8     7

因此,假设在排除列中的所有观察结果(包括列的最大值出现的行)之后,我试图找到每列大于5的观察数.

预期结果:

samp1 samp2 samp3 samp4 
   2     2     4    3 

通过使用嵌套for loops来排除我不想要的观察,我能够得到我想要的答案.

newfake.dat<-data.frame()

for(j in 1:length(fake.dat)){
for(i in 1:nrow(fake.dat)){ …