powered by
data(blanden)
data(blanden) mobilityMc<-as(blanden, "markovchain")
Run the code above in your browser using DataLab