I've been spending hours now trying to figure out this error, to no avail.
I'm trying to create a function that with one of the input parameters as a rms cph object.
Women who would like to serve a mission must meet the same standards of worthiness and be at least 19 years old.
Women generally serve as missionaries for 18 months.
Married retired couples, on the other hand, are encouraged to serve missions, but their length of service may vary from 6 to 36 months depending on their circumstances and means.
Any single retired person may also be called to serve in what is known as senior missionary service.
In the last two decades, the LDS Church has stepped up its call for senior couple missionaries.
All missionaries must meet certain minimum standards of worthiness.
Among the standards that a prospective missionary must demonstrate adherence to are: regular attendance at church meetings, regular personal prayer, regular study of the scriptures, adherence to the law of chastity (sexual purity), adherence to the Word of Wisdom (code of health and nutrition), payment of tithing, spiritual diligence and testimony of God.
In addition to spiritual preparedness, church bishops are instructed to ensure that prospective missionaries are physically, mentally, and emotionally capable of full-time missionary work.
However, if I do ggplot(Predict(model.ph, time=365)), everything works.