我在训练数据上建立了一个coxph模型，我在使用它来验证验证数据集时遇到了麻烦。我使用Surv构建了一个生存对象，并将其用作coxph模型中的响应变量。然后我使用预测对训练和测试数据集进行预测，但两次都预测使用训练数据。
my.surv<-Surv(train$time_to_event, train$event, type="right")
basic.coxph<-coxph(my.surv~train$basin+train$region+train$district_code)
prediction_train<-predict(basic.coxph,train,type="risk")
prediction_test<-predict(object=basic.coxph,newdata=validate,type="risk")
prediction_train和prediction_test的结果具有相同的维度并且完全相同，尽管训练和验证数据集具有不同的维度但是具有相同的列。我在这里做错了什么建议？