Отображение нескольких файлов .fig в одном графике

Question

Я пытаюсь написать относительно простую функцию, которая позволяет мне строить любое количество цифр (ранее сохраненных как .fig-файлы) один рядом с другим.

Я искал решение на веб-сайте, но оно не работает для меня. Более того, я почти там с моим кодом, так как выходы почти то, что я хочу: действительно, я получаю две фигуры в правильном положении, но в двух отдельных окнах и в третьем окне, которое правильно объединяет два входа, но они выглядите странно, с более низким разрешением! Таким образом, я получаю три результата.

Вот мой код, надеюсь, вы можете мне помочь. (Попробуйте со своими файлами .fig и проверьте, есть ли у вас три неправильных выхода, например я).

function SubPlotFig (varargin) 

for i = 1:nargin 
hf = hgload(varargin{i}); 
ax(i) = findobj(hf,'Type','axes'); 
end 

hc = figure; 
for i = 1:nargin 
subplot(1,2,i,ax(i)); 
copyobj(ax(i),hc); 
end 

Attachment_1 Attachment_2

Answer 1

Проблема была в цветовой палитре. Теперь он решен. Вот правильный код, может быть полезным для других :)

function SubPlotFig (varargin) 

for i = 1:nargin 
hf = openfig(varargin{i},'reuse'); 
cm = colormap; 
c(i) = findobj(hf,'Type','Colorbar'); 
ax(i) = findobj(hf,'Type','Axes'); 
end 

hc = figure; 
for i = 1:nargin 
subplot(1,2,i,ax(i)); 
copyobj(ax(i),hc); 
colormap(ax(i),cm); 
copyobj([c(i),ax(i)],hc); 
end 

Answer 2

При вызове hgload, он будет открывать фигуру из .fig файла и отобразить его. Вы делаете это внутри своего первого цикла, так что вы увидите цифру для каждого из входов. Показатель, который вы видите, равен точно, что вы сохранили для каждой фигуры.

for i = 1:nargin 
    hf = hgload(varargin{i});   % <---- Creates a figure 
    ax(i) = findobj(hf,'Type','axes'); 
end 

Во втором цикле, вы создаете subplot для каждого из axes в цифры, которые вы только что открыли. Разумеется, они будут меньше, потому что теперь вы устанавливаете несколько axes в размере figure, который является размером по умолчанию. Они на самом деле не «низкое разрешение», а меньше на экране. Если вы хотите увеличить их размер, вам нужно увеличить размер фигуры.

% Create all of the subplots 
hc = figure; 
for i = 1:nargin 
    hax = subplot(1,2,i,ax(i)); 
    copyobj(ax(i),hc); 
    colorbar(hax); 
end 

% Make sure we are using the jet colormap 
colormap(jet) 

% Get the current figure position 
pos = get(hc, 'Position'); 

% Double the width since you now have two plots 
set(hc, 'Position', [pos(1:2) pos(3)*2, pos(4)])