%exm0423_1.m
clear
C_str=char('這是','元胞數組創建算例 1');	%產生字符串
R=reshape(1:9,3,3);							%產生 實數陣R
Cn=[1+2i];										%產生復數標量
S_sym=sym('sin(-3*t)*exp(-t)');			%產生符號函數量  
A(1,1)={C_str};A(1,2)={R};A(2,1)={Cn};A(2,2)={S_sym};
C=cell(2);												%預設 空元胞數組  
C(:,1)={char('Another','text string');10:-1:1} 	%對第一列元胞賦值  
A_C=[A;C];					%分號利用來分隔"行"  

%元胞數組的收縮
A_C(3,:)=[];				%刪除第3行，使A_C成為 的元胞數組  

%把A_C重組成 元胞數組R_A_C
R_A_C=reshape(A_C,2,3)  


%取一個元胞
f1=R_A_C(1,3)				%使用園括號尋訪得到的是元胞，而不僅是內容。  
class(f1)  


%取一個元胞的內容
f2=R_A_C{1,3}				%用花括號尋訪取得內容  
class(f2)  


%取元胞內的子數組
f3=R_A_C{1,1}(:,[1 2 5 6])		%注意三種括號的不同用途
									%取第1行第1列元胞內容中的第1、2、5、6列。  


%同時調取多個元胞內容
[f4,f5,f6]=deal(R_A_C{[1,3,4]})	%取三個元胞內容，賦值給三個變量