r - R の順序混同行列

Question

3 つのクラスでの観測とその予測から混同行列を作成しました。

classes=c("Underweight", "Normal", "Overweight")

混同行列を計算すると、表のクラスがアルファベット順に整理されます。これが私のコードです。

# Confusion matrix
Observations <- bmi_classification(cross.m$bmi)
Predicted <- bmi_classification(cross.m$cvpred)

conf <- table(Predicted, Observations)

library(caret) 
f.conf <- confusionMatrix(conf)
print(f.conf)

これにより、次の出力が生成されます。

Confusion Matrix and Statistics

             Observations
Predicted     Normal Overweight Underweight
  Normal          17          0           1
  Overweight       1          4           0
  Underweight      1          0           1

ですので、まずアンダーウエイト、次にノーマル、最後にオーバーウエイトにしたいと思います。注文を引数としてマトリックスに渡そうとしましたが、うまくいきませんでした。

編集：

並べてみましたが、

conf <- table(Predicted, Observations)

reorder = matrix(c(9, 7, 8, 3, 1, 2, 6, 4, 5), nrow=3, ncol=3)

conf.reorder <- conf[reorder]

しかし、私は得ています、[1] 1 1 0 1 17 1 0 0 4