在R中处理具有不等长度行的矩阵

Question

我想划分两个矩阵：numer1 和 denom1。问题是它们的行长不相等。该脚本每周运行一次，因此尺寸也每周更改一次。

本周：

dim(numer1) = 998 rows, 99 columns 

dim(denom1) = 997 rows, 99 columns. 

上周：

dim(numer1) = 999 rows, 99 columns 

dim(denom1) = 998 rows, 99 columns.

有没有办法比较这些矩阵并删除较大矩阵中的最后一行（在本例中为numer1）？

这是我尝试过的：

fun1 <- as.data.frame(abs(numer1[-last(numer1),]/denom1))

谢谢！

Answer 1

这个怎么样：

rows <- 1:pmin(nrow(numer1), nrow(denom1))
frac1 <- numer1[rows,] / denom1[rows,]