r - R 合計を使用した混同行列

Question

実際の値と予測値を含むデータ テーブルがあります。混同行列は簡単に生成できますが、行列の各要素を 3 列目の合計にしたいと考えています。以下のコード例では、データ テーブルの各行を、実際の土地分類と予測された土地分類、および関連する領域を持つ多角形と考えることができます。混同マトリックスに、各ペアリングの面積の合計を表示してもらいたいです。

library(data.table)
library(caret)

set.seed(9)

# Possible land classifications
land.class <- c("Grass","Building","Road","Parking")

# Build a data table of actual and predicted values
dt <- data.table(actual=sample(land.class,100,replace=TRUE),
             predict=sample(land.class,100,replace=TRUE),
             area=rnorm(n=100,mean=50,sd=15))

# Confusion matrix
confusionMatrix(dt$predict,dt$actual)

# Which is the same as
table(dt$predict,dt$actual)

# How do I get each cell to be the sum of the area?
sum(dt[actual=='Grass' & predict=='Grass']$area)
sum(dt[actual=='Grass' & predict=='Building']$area)