Rで勝利クラスの投票比率を取得する方法

データフレームを使用した方法: クラス分類の結果が格納されたデータフレームがあるとします。以下のコードを使用して、勝利クラスの投票比率を計算できます。
```
# データフレームの作成（仮のデータ）
result_df <- data.frame(class = c("A", "B", "A", "A", "B", "B"))
# 勝利クラスの投票数を取得
vote_counts <- table(result_df$class)
winning_class <- names(vote_counts)[which.max(vote_counts)]
# 勝利クラスの投票比率を計算
winning_class_ratio <- vote_counts[winning_class] / sum(vote_counts)
```
上記の例では、result_dfというデータフレームにクラス分類の結果が格納されています。table()関数を使用して、各クラスの投票数を取得し、which.max()関数を使用して最も多い投票数を持つクラスを見つけます。最後に、勝利クラスの投票数を総投票数で割ることで、投票比率を計算します。
ベクトルを使用した方法: クラス分類の結果がベクトルとして与えられている場合、以下のコードを使用して勝利クラスの投票比率を計算できます。
```
# クラス分類の結果（仮のデータ）
result_vector <- c("A", "B", "A", "A", "B", "B")
# 勝利クラスの投票数を取得
vote_counts <- table(result_vector)
winning_class <- names(vote_counts)[which.max(vote_counts)]
# 勝利クラスの投票比率を計算
winning_class_ratio <- vote_counts[winning_class] / sum(vote_counts)
```
上記の例では、result_vectorというベクトルにクラス分類の結果が格納されています。table()関数を使用して、各クラスの投票数を取得し、最も多い投票数を持つクラスを見つけます。最後に、勝利クラスの投票数を総投票数で割ることで、投票比率を計算します。

これらの方法を使用することで、Rで勝利クラスの投票比率を簡単に取得することができます。