In[]:=
A={{.9,.2},{.1,.8}}
Out[]=
{{0.9,0.2},{0.1,0.8}}
In[]:=
Eigenvalues[A]
Out[]=
{1.,0.7}
In[]:=
S=Transpose[Eigenvectors[A]]
Out[]=
{{0.894427,-0.707107},{0.447214,0.707107}}
In[]:=
MatrixForm[S]
Out[]//MatrixForm=

0.894427
-0.707107
0.447214
0.707107
