Update Coxph.R

A few edits to look at control too