% 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
Tento web jsem zakládal na střední, v roce 2008. Je zde hlavně archiv mé tvorby.
Aktuální věci publikuji kvůli úspoře času na Twitter.
Honza
"Lidé potřebují, aby řák v jejich životě fungoval co nejlépe. Řád v našem životě skýtá obraz o tom, jací jsme."