r - Rで長さが異なる行を持つ行列の処理

Question

割りたい 2 つの行列があります: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,]