## load NKI dataset
data(NKI)
## compute St Gallen predictions
st.gallen(size=demo.nkis[ ,"size"], grade=demo.nkis[ ,"grade"],
node=demo.nkis[ ,"node"], her2.neu=sample(x=0:1, size=nrow(demo.nkis),
replace=TRUE), age=demo.nkis[ ,"age"], vascular.inv=sample(x=0:1,
size=nrow(demo.nkis), replace=TRUE), na.rm=TRUE)
Run the code above in your browser using DataLab