R语言中将AUC值添加到ROC曲线中，使小数点后面的0也保留。请告诉R代码。

关于将AUC值添加到ROC曲线中并保留小数点后的0位，以下是R代码：

1. 首先需要计算ROC曲线的AUC值：

library(pROC)
roc_obj <- roc(response, predictor) # response为响应变量，predictor为预测变量
auc_val <- auc(roc_obj) # 计算AUC值

2. 然后将AUC值添加到ROC曲线右上方，保留小数点后的0位：

plot(roc_obj, print.thres = "best", main="ROC Curve", 
     percent=TRUE, # y轴显示百分比
     ylim=c(0, 100), xlim=c(0, 100), # 设置x、y轴范围
     print.auc=TRUE, auc.polygon=TRUE, # 添加AUC值和AUC面积
     auc.digits = 0 # 设置保留小数点后0位
)