r - data.frame を多次元リストとマージする

Question

25 個の変数を持つデータ フレーム「QARef」があります。一意のジョブは 5 つしかありません (3 列目) が、ジョブごとに多くの行があります。

str(QARef) 'data.frame': 648 obs. 25 個の変数:

特定の行の 5 つのジョブすべての平均値を生成するために tapply を使用しています。

RefMean <- tapply(QARef$MTN,
                  list(QARef$Target_CD, QARef$Feature_Type, QARef$Orientation, QARef$Contrast, QARef$Prox),
                  FUN=mean, trim=0, na.rm=TRUE)

そして、多次元リストと呼ばれることを望んでいるものを取得します。

str(RefMean)
 num [1:17, 1:2, 1:2, 1:2, 1:2] 34.1 34.2 25.2 28.9 29.2 ...
 - attr(*, "dimnames")=List of 5
  ..$ : chr [1:17] "55" "60" "70" "80" ...
  ..$ : chr [1:2] "LINE" "SQUARE"
  ..$ : chr [1:2] "X" "Y"
  ..$ : chr [1:2] "CLEAR" "DARK"
  ..$ : chr [1:2] "1:1" "Iso"

私がしたいのは、QARef の列の値と RefMean の dimnames の一致に応じて、各行の正しい RefMean 値を含む列を QARef に追加することです。たとえば、QARef 列 Feature_Type=="LINE" は、dimname "LINE" などと一致する必要があります。

これを行う方法や答えを見つけるためのヒントをいただければ幸いです。