Как найти наименьшие значения списка матриц по столбцам

Question

Предположим, у меня есть список матриц.Предположим далее, что я хотел бы найти наименьшее значение по каждому значению матриц.Например,

y <- c(3,2,4,5,6, 4,5,5,6,7)
x[lower.tri(x,diag=F)] <- y
> x
     [,1] [,2] [,3] [,4] [,5]
[1,]    0    0    0    0    0
[2,]    3    0    0    0    0
[3,]    2    6    0    0    0
[4,]    4    4    5    0    0
[5,]    5    5    6    7    0



k <- c(1,4,5,2,5,-4,4,4,4,5)
z[lower.tri(z,diag=F)] <- k
> z
     [,1] [,2] [,3] [,4] [,5]
[1,]    0    0    0    0    0
[2,]    1    0    0    0    0
[3,]    4    5    0    0    0
[4,]    5   -4    4    0    0
[5,]    2    4    4    5    0



 d <- list(k, x)

Ожидаемый результат:

dd <– matrix(0,5,5)
    dd
     [,1] [,2] [,3] [,4] [,5]
[1,]    0    0    0    0    0
[2,]    1    0    0    0    0
[3,]    2    5    0    0    0
[4,]    4   -4    4    0    0
[5,]    2    4    4    5    0

Answer 1

Мы могли бы использовать pmin, чтобы получить соответствующее минимальное значение для каждого элемента в данных list

do.call(pmin, d)
#     [,1] [,2] [,3] [,4] [,5]
#[1,]    0    0    0    0    0
#[2,]    1    0    0    0    0
#[3,]    2    5    0    0    0
#[4,]    4   -4    4    0    0
#[5,]    2    4    4    5    0

d <- list(z, x)