%exm04212_1.m
C_str=char('這是','元胞數組創建算例 1');	%產生字符串
R=reshape(1:9,3,3);							%產生 實數陣R
Cn=[1+2i];										%產生復數標量
S_sym=sym('sin(-3*t)*exp(-t)');			%產生符號函數量  


%（1）直接創建法之一："外標識元胞元素賦值法"
A(1,1)={C_str};A(1,2)={R};A(2,1)={Cn};A(2,2)={S_sym};
A 												%顯示元胞數組 

disp('按任意鍵，繼續。'),pause


%（2）直接創建法之二："編址元胞元素內涵的直接賦值法"
B{1,1}=C_str;B{1,2}=R;B{2,1}=Cn;B{2,2}=S_sym;
celldisp(B)					%顯示元胞數組內容