В R со списком матриц, как я могу быстро найти разницу между первой и второй строкой в ​​каждой матрице в списке?

Question

Предположим, у меня есть список, подобный следующему:

my.list <- replicate(100, matrix(rnorm(50), nrow = 2), simplify = FALSE)

, который содержит 100 элементов, каждый из которых представляет собой матрицу 2 на 25.Я хотел бы найти разницу между второй и первой строкой для каждой матрицы в массиве.Итак, глядя на первую матрицу:

> my.list[[1]]
      [,1]       [,2]       [,3]        [,4]        [,5]       [,6]      [,7]       [,8]
[1,] -0.6439385 -1.0432182 -0.8209565 -0.39554834  0.11923593 -0.7924756 0.9486538 -0.5773245
[2,] -0.2485357  0.3248831  0.0510696 -0.01372084 -0.03815523 -2.0050425 1.0868125 -2.5684173
           [,9]      [,10]      [,11]       [,12]      [,13]     [,14]      [,15]     [,16]
[1,] -0.2007935 -0.4698965 -1.2655670 -0.09743834 -0.1665144 0.2858232 -1.5013000 1.3658686
[2,]  0.7978383  0.1259687 -0.0956009  1.63116327 -2.6593684 1.5665240  0.8206011 0.1437499
          [,17]    [,18]      [,19]      [,20]      [,21]      [,22]      [,23]      [,24]
[1,]  1.0984398 1.423985 -1.4280701 -0.3175241  0.3076809 -1.9266312 -0.2429406 -0.9616004
[2,] -0.6761191 1.201523 -0.4578632  1.8785372 -0.2124522 -0.9074403 -0.9615636  1.4551716
          [,25]
[1,] -0.2794859
[2,] -0.9004094

Я хотел бы получить:

my.list[[1]][2,]-my.list[[1]][1,]
 [1]  0.3954028  1.3681013  0.8720261  0.3818275 -0.1573912 -1.2125669  0.1381587 -1.9910928
 [9]  0.9986318  0.5958652  1.1699661  1.7286016 -2.4928540  1.2807008  2.3219011 -1.2221187
[17] -1.7745590 -0.2224617  0.9702069  2.1960613 -0.5201331  1.0191909 -0.7186231  2.4167720
[25] -0.6209235

, но для ВСЕХ матриц.Есть ли простой способ сделать это?Благодаря.

Answer 1

Или другой вариант

library(purrr)
map(my.list, ~  c(diff(head(.x, 2))))

Answer 2

Вы можете использовать lapply для вычисления вычитания по каждой матрице

lapply(my.list, function(x) x[2,]-x[1,])