R 언어에서 한 줄의 최대 값을 선택합니다.

함수를 사용자 정의하거나 사용할 때 정의할 수 있습니다.
> mat  mat
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    7    8    9
[3,]    4    5    6


> apply(mat, 2, function(x){order(x, decreasing=T)[1]})   #  
[1] 2 2 2

> apply(mat, 1, function(x){order(x, decreasing=T)[1]})   #  
[1] 3 3 3
> apply(mat, 1, function(x){which.max(x)})                #  
[1] 3 3 3


> n  n
[1] "a" "b" "c" "d" "e"

> t  n[t]
[1] "c" "c" "c"

다른 예:
MaxVar  1L) {
    c(999, NA)
  } else {
    c(maxx, wmax)
  }
  out
}


And use it like this:

> new  new
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,]    3    4  999  999  999    4    4    2    4   999
[2,]    1    4   NA   NA   NA    4    2    3    4    NA

> Mydata  Mydata
   ID X1 X2 X3 X4 Max Var
1   1  3  1  1  1   3   1
2   2  1  2  1  4   4   4
3   3  1  1  1  1 999  NA
4   4  1  3  3  1 999  NA
5   5  2  2  2  1 999  NA
6   6  1  2  3  4   4   4
7   7  2  4  3  3   4   2
8   8  1  1  2  1   2   3
9   9  3  2  1  4   4   4
10 10  4  4  4  4 999  NA


 : http://stackoverflow.com/questions/29683339/number-of-maximums-in-each-row-and-more/29686201#29686201

좋은 웹페이지 즐겨찾기