Fs=8192;c=28;
do=c+1;​​re=c+2;​​mi=c+3;​​fa=c+4;​​sol=c+5;​​la=c+6;​​si=c+7;​​dol=c+8;​​​​tone=[0,do,re,mi,fa,sol,la,si,dol,0]​​reythm=[0.5,0.5,0.5,0.5,0.5,0.5,0.5]
​
In[]:=
Sound[SoundNote["C"]]
In[]:=
Sound[SoundNote["CG"]]
In[]:=
Sound[{SoundNote["C"],SoundNote["C"],SoundNote["G"]}]
​
矩阵乘法示例：
b={{3,1},{0,2}}​​Eigenvectors[b]​​MatrixPower[b,3]​​w={{1,-1},{0,1}}​​Inverse[w].b.w​​Inverse[Eigenvectors[b]].b.Eigenvectors[b]​​MatrixPower[Inverse[w].b.w,3]​​w.MatrixPower[Inverse[w].b.w,3].Inverse[w]
​
3bule1brown：
In[]:=
a={{0,1},{1,1}}​​v={{2,2},{1+Sqrt[5],1-Sqrt[5]}}​​Inverse[v].a.v//MatrixForm
Out[]=
{{0,1},{1,1}}
Out[]=
{2,2},1+
5
,1-
5

Out[]//MatrixForm=
1
5
+(1+
5
)
1
2
5
-
1-
5
4
5
1
5
+(1-
5
)
1
2
5
-
1-
5
4
5
-
1
5
+(1+
5
)-
1
2
5
-
-1-
5
4
5
-
1
5
+(1-
5
)-
1
2
5
-
-1-
5
4
5
​
​
In[]:=
Eigenvectors[a]​​Inverse[Eigenvectors[a]].a.Eigenvectors[a]//MatrixForm
Out[]=

1
2
(-1+
5
),1,
1
2
(-1-
5
),1
Out[]//MatrixForm=
-
-1+
5
2
5
-
1
5
2
(-1+
5
)
4
5
+
1
2
(-1-
5
)
-1+
5
2
5
+
1+
5
2
5
-1+
5
5
+
1+
5
2
5
In[]:=
MatrixPower[a,n]
Eigenvectors[a].MatrixPower[Inverse[Eigenvectors[a]].a.Eigenvectors[a],n].Inverse[Eigenvectors[a]]
​
In[]:=
K={{4,-5},{2,-3}}​​Eigenvectors[K]​​Inverse[Eigenvectors[K]].K.Eigenvectors[K]
Out[]=
{{4,-5},{2,-3}}
Out[]=
{{5,2},{1,1}}
Out[]=

1
3
,
1
3
,
20
3
,
2
3

​
​
​
​
​
​
​
​
​
​
​
​
Infinity
:碰到不定表达式 0ComplexInfinity.
​
​
​
​
​
​
​
​
​
​​
​