library(rcssci)
rcssci_logistic(data=sbpdata, y = "status",x = "sbp",
prob=0.1,filepath=tempdir())
# library(rcssci)
# rcssci_logistic(knot=4,data=sbpdata, y = "status",x = "sbp",
# covs=c("age","gender"),prob=0.1,filepath="D:/temp")
Run the code above in your browser using DataLab