Biograph.mvna(Bdata)
Allignol, A., M. Schumacher and J. Beyersmann (2011). Empirical transition matrix of multistate models: the etm package. Journal of Statistical Software, 38(4), 15 pp.
data(GLHS)
D <- Biograph.mvna (GLHS)
# Run mvna:
require (mvna)
zz <- attr(D$D,"param")$namstates
zzz <- attr(D$D,"param")$trans_possible
na <- mvna(data=D$D,state.names=zz,tra=zzz,cens.name=D$cens)
Run the code above in your browser using DataLab