JanKoWeb: Odborný SW - MATLAB: úprava figure z již vytvořeného fig souboru
"Nemusí pršet, stačí když kape..."
JanKoWeb - návody, postřehy a rady ze světa softwaru pro každého.
Recenze knih a humorná tvorba pro chvíle oddechu...
Světový den veterinárních lékařů.

Do západu slunce 1 hodina a 35 minut (vyšlo 05:05, zapadne 21:10).

"Vést rozhovor je umění."

nn
Galerie nemohla být načtena.
Jméno:
Číselně: jedna a osm je
Když se ti stane, že otevřeš nějaké okno a najednou zaopmeneš, co jsi chtěl, máš už dost!
Při každém obnovení stránky se zde vypíše zpráva skriptu.

Skript je zdrojový kód interpretovaného programu.

Pohání celý tento web a rád komunikuje s návštěvníky.-)
RSS RSS zdroj článků a novinek

MATLAB: úprava figure z již vytvořeného fig souboru


% tabulka nahrad labelu os
replace_label = {
    'Hour of day (h)','Day time (h)';
    'Hour of day','Day time (h)';
    'Load (kW)','Building power demand (kW)';
    'Load (kW)','Building power demand (kW)';
    '[','(';
    ']',')';
    '(0-1)','(-)';
    };

cd(fileparts(mfilename('fullpath'))); % aktualni adresar jako pracovni

%% save as png
files = dir(['in/*.fig']);
for i=1:length(files)
    clc
    close all
    f = [files(i).name];
    open(['in/' f]);
    
    % zmena popisku os - tabulka nahrad vyse
    ax = findobj(gcf,'Type','axes','Tag','');
    for j=1:size(replace_label,1)
        for a=1:length(ax)
            xlbl = get(get(ax(a),'XLabel'),'String');
            ylbl = get(get(ax(a),'YLabel'),'String');
            xlabel(ax(a),strrep(xlbl,replace_label{j,1},replace_label{j,2}));
            ylabel(ax(a),strrep(ylbl,replace_label{j,1},replace_label{j,2}));
        end
    end
    
    % vymazani titulku
    title(''); 
    
    % mrizka
    grid on
    
    % velikost fontu
    set(findall(gcf,'-property','FontSize'),'FontSize',22)
    
    % tick na osach
%     set(gca,'FontSize',18);
    
    % velikost obrazku
    set(gcf,'PaperUnits','centimeters','PaperPosition',[0 0 30 20])
    
    set(gca,'LineWidth',2) % tlouš?ka os
    
    % tloustka car
    set(findall(gca, 'Type', 'Line'),'LineWidth',2);
    
    % cekat na kliknuti do obrazku
    %    waitforbuttonpress;
    
    %% marker size
    markers = findobj(get(gcf,'children'), 'type', 'line'); %// children of legend of type line
    for m=markers
        set(m, 'Markersize', 12); %// set value as desired
    end


    
    %%
    
    
    % save
    saveas(gcf,['out/' f '.png']);
    saveas(gcf,['out/' f '.fig']);
    % export_fig([f '.eps'],'-epsc')   %-eps nefunguje a pada matlab
end
Rubrika Odborný SW | Tagy Matlab | Pá 06.10.2017 | 715x

Náhodné články

© 2008-2025 JK, kontakt, právní upozornění
Powered by Janko's RS| XHTML, CSS, RSS, analýza kódu, SEO servis, dostupnost, hosting, líbí se Vám tu?
Požadavek: 0.80547 s, generování: 0.02897 s, paměť: 1.24 MB, sql dotazů: 8, CPU: 24.52

.