I need help understanding how my professor got this answer, in order words, what R CODE was used to compute the answer(output). This is for both highlighted questions.

Using the msteptom function, obtain P10 for testtom, testtpm2, and testtpm3. ANSWER msteptpm(as. matrix(testtpm), 10) ## [1, ] 1.6000000 0.60606090 0.000606060 0.060cecco 0.0ocoeece 0.0ceecee ## [2, ] 0.6958740 0.03193378 0. 006005764 0.03886700 0.03095722 0.1963623 ## [3, ] 0.4176760 0.04804611 0. 009180069 0.05937576 0.04804611 0.4176760 ## [4, ] 0.4333985 0.03886700 0.007421970 0.04804707 0.03886700 0.4333985 ## [5, ] @. 1963623 0.03095722 0. 006005764 0.03886700 0.03193378 0.6958740 msteptom(as. matrix(testtpm2), 10) A B D ## [2, ] @ 1 0.0000800 0.0000000 0.0000000 0.0000000 ## [3, ] 0 0 0.1195321 0.1091943 0.3578794 0.4133942 [4, ] 0 0 0.1197309 0.1099988 0.3580526 0.4122177 ## [5, ] @ @ @.1191609 0. 1077578 0.3573294 0.4157519 ## [6, ] @ @ @.1186364 0.1052952 0.3565386 0.4195297 msteptom(as .matrix(testtpm3) , 10) C D ## [1, ] 5.9049e-06 0.08791157 0.4033333 0.3025240 0.0000989527 0.1511815 ## [2, ] 0.0000e+00 0.61538689 0.0000900 0.0906000 0.0090909090 0.0009090 ## [3, ] 0.00002+60 0.00060000 0.4717471 0.3527039 0.0000600000 0.1755490 ## [4, ] 0.0000e+00 0. 00090080 0.4689336 0. 24889LT.0 0000090900.0 264TUSE.0 98 ## [5, ] 0.0080e+06 0.00600080 0.4707616 0.3529204 0.0001048576 0.1762131 ## [6, ] 0.0000+00 0.090ocoee 0.4708071 0.3510980 0.0090ocoee0 0.1780949 ## [7, ] 0.0000e+00 0. 61538098 0.0000900 ## G ## [1, ] 0.05494473 ## [2, ] 0.38461311 ## [3, ] 0.00000608 0000000.0 ['+] ## ## [5, ] 0.008080 ## [6, ] 0.00080090 ## [7, ] 0.38461902 Carry out the canonical decomposition for the testtpm3. ANSWER steadyStates (mc ) # # a bcd ## [1, ] 0.0 0.0 01 ## [2, ] 0.5 0.5 0 0