A explicação do script a seguir está no artigo R na Prática – Parte 26.

> X=matrix(1:9,ncol=3,nrow=3)
> X
     [,1] [,2] [,3]
[1,]    1    4    7
[2,]    2    5    8
[3,]    3    6    9
> tX=t(matrix(1:9,ncol=3,nrow=3))
> tX
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    4    5    6
[3,]    7    8    9