## Not run:
# library(SEERaBomb)
# pm=simSeerSet()
# pm=mk2D(pm,secondS="B")
# L=post1PYO(pm$canc,brks=c(0,2,5),binIndx=1,Trt="rad",yearEnd=2012 )
# names(L)
# names(pm)
# with(pm,getE(L$LPYM,D,ageStart,ageEnd,yearEnd,cancerS,secondS))
# ## End(Not run)
Run the code above in your browser using DataLab