利用logistic回归模型建立诊断类预测模型，对模型在训练集和验证集进行校准度评价，绘制校准曲线和HL检验，R语言代码如何实现