1

サブプロットの例を次に示します。

http://www.mathworks.com/support/solutions/en/data/1-16BSF/?product=SL&solution=1-16BSF

figure(1)
surf(peaks(10))
colorbar

figure(2)
mesh(peaks(10))
colorbar

figure(3)
contour(peaks(10))
colorbar

figure(4)
pcolor(peaks(10))
colorbar

% Now create destination graph

figure(5)
ax = zeros(4,1);
for i = 1:4
ax(i)=subplot(4,1,i);
end

% Now copy contents of each figure over to destination figure
% Modify position of each axes as it is transferred

for i = 1:4
figure(i)
h = get(gcf,'Children');
newh = copyobj(h,5)
for j = 1:length(newh)
posnewh = get(newh(j),'Position');
possub = get(ax(i),'Position');
set(newh(j),'Position',...
[posnewh(1) possub(2) posnewh(3) possub(4)])
end
delete(ax(i));
end
figure(5)

この例のサブプロットにどのようにラベルを追加しますか? 「図 1」「図 2」などを追加するだけでも有益です。

4

3 に答える 3

1

次のように、スクリプトの最後に 2 行を追加します。

string = {'Figure 1','Figure 2','Figure 3','Figure 4'}; %%% or any titles you want
for i = 1:4
figure(i)
title(string{i}) %%% add this line
h = get(gcf,'Children');
newh = copyobj(h,5)
for j = 1:length(newh)
posnewh = get(newh(j),'Position');
possub = get(ax(i),'Position');
set(newh(j),'Position',...
[posnewh(1) possub(2) posnewh(3) possub(4)])
end
delete(ax(i));
end
figure(5)
于 2013-07-29T15:56:19.513 に答える
1

使えませんか

figure(5)
subplot(4,1,1)
title('first figure')
subplot(4,1,2)
...

スクリプトの最後に？それとも私は何かを逃しましたか？

あるいはtitle、元の図で使用します。

 figure(1)
 surf(peaks(10))
 title('first figure')
于 2013-07-29T15:43:00.387 に答える