powered by
transitions(Bdata,newnamstates)
data (GLHS) z <- transitions (GLHS)
Run the code above in your browser using DataLab