希望用R语言进行自举重采样验证（boostrap-resampling）来内部验证模型。

请问怎么计算 The bias-corrected AUC（95%CI:？？？？？？） generated by bootstrap validations ？？？

校正后的AUC和R^2 怎么计算

R代码怎么写呐？