Find the maximum and minimum value of every column and then find the maximum and minimum value of every row

前端 未结 4 775
离开以前
离开以前 2020-12-13 19:04

I\'ve got this matrix:

a <- matrix(rnorm(1000 * 18, mean = 100, sd = sqrt(10)), 1000, 18)

I would like to find the maximum and minimum v

相关标签:
4条回答
  • 2020-12-13 19:12

    See the matrixStats package. You can use colMins(), rowMaxs() and functions like this both for columns and rows.

    See this answer: How to find the highest value of a column in a data frame in R?

    0 讨论(0)
  • 2020-12-13 19:13

    You can try

    apply(a, 1, range)
    

    Using this together with t, this gives you two columns. The first one with the minimum the second with the maximum of the rows.

    head(t(apply(a, 1, range)))
             [,1]     [,2]
    [1,] 95.75922 103.6956
    [2,] 93.62636 106.3934
    [3,] 92.70567 106.9190
    [4,] 96.53577 104.4971
    [5,] 96.61573 107.6691
    [6,] 95.56239 105.5887
    

    for the column maxima change 1 to 2 in the apply function.

    0 讨论(0)
  • 2020-12-13 19:14

    A faster alternative for row max/min would be using pmax() and pmin() even though you would first have to convert the matrix to a list (data.frame is a special case of a list):

    apply(a,1,min)
    apply(a,1,max)
    # becomes
    do.call(pmin, as.data.frame(a))
    do.call(pmax, as.data.frame(a))
    

    For the columns it will be less "competitive" because of having to transpose first:

    apply(a,2,min)
    apply(a,2,max)
    # becomes
    do.call(pmin, as.data.frame(t(a)))
    do.call(pmin, as.data.frame(t(a)))
    

    Benchmarking:

    a <- matrix(rnorm(1000 * 18 *10, mean = 100, sd = sqrt(10)), 1000 * 10, 18 * 10)
    
    microbenchmark::microbenchmark(
      do.call(pmin, as.data.frame(a)),
      apply(a,1,min),
      unit = "relative"
    )
                                expr      min     lq     mean   median       uq       max neval
     do.call(pmin, as.data.frame(a)) 1.000000 1.0000 1.000000 1.000000 1.000000 1.0000000   100
                    apply(a, 1, min) 2.281095 2.3576 2.096402 2.531092 2.618693 0.6284233   100
    
    0 讨论(0)
  • 2020-12-13 19:31

    Figured it out.

    Minimum and maximum of every column:

    apply(a,2,min)
    apply(a,2,max)
    

    Minimum and maximum of every row:

    apply(a,1,min)
    apply(a,1,max)
    

    Found the information here http://www.personality-project.org/r/r.commands.html

    0 讨论(0)
提交回复
热议问题