# Exercise 3-P 414:


P = matrix(c(.5, .25, .25,
             .5, .25, .25,
             .5, .25, .25), nrow = 3, ncol = 3, byrow=T)

P
##      [,1] [,2] [,3]
## [1,]  0.5 0.25 0.25
## [2,]  0.5 0.25 0.25
## [3,]  0.5 0.25 0.25

\[P^2\]

P2 = P %*% P
P2
##      [,1] [,2] [,3]
## [1,]  0.5 0.25 0.25
## [2,]  0.5 0.25 0.25
## [3,]  0.5 0.25 0.25

\[P^3\]

P3 = P2 %*% P
P3
##      [,1] [,2] [,3]
## [1,]  0.5 0.25 0.25
## [2,]  0.5 0.25 0.25
## [3,]  0.5 0.25 0.25

\[P^7\]

P7 = P3 %*% P
P7
##      [,1] [,2] [,3]
## [1,]  0.5 0.25 0.25
## [2,]  0.5 0.25 0.25
## [3,]  0.5 0.25 0.25

\[p=p^n\]