您可以使用命令axis 在 x 轴下添加标签。我会给你两个选项,第一个直方图和第二个条形图。首先是直方图,它看起来有点棘手,因为 logistic 和 svm 的精度值落在同一个 bin 中。因此,它只显示一个标签,这是一个问题。这就是为什么我决定在条形图中也这样做的原因。这是直方图中的代码:
df <- data.frame(Accuracy = c(0.5419, 0.5231, 0.5464),
row.names = c("Logistic", "Random Forest", "SVM"))
hist(df$Accuracy, seq(0.49,0.55,by=0.001))
values <- c(df$Accuracy)
labels <- c(row.names(df))
axis(1, at = values, labels = labels, tick = FALSE, padj = 1.5)
输出:
使用条形图,它看起来像这样:
barplot(df$Accuracy, ylim= c(0, 0.6))
axis(1, at = 1:length(unique(df$Accuracy)), labels=unique(row.names(df)), padj = 1.5)
输出:
条形图似乎是显示模型准确性的更好选择。