Hi people
today i have something nice! i needed to export a simulink modell to powerpoint, and i did not want to make a screen shot. the clue is saveppt.
to use the program, i typed:
function carpetplot(data,FigNr,colormap)
max_zeilen = 24*4;
zeile=1;
spalte=1;
i=1;
while spalte <= 365,
while zeile <= max_zeilen,
DATA(zeile,spalte)=data(i);
zeile=zeile+1;
i=i+1;
end
spalte=spalte+1;
zeile=1;
end
x=[1:1:365];
y=[0:(1/(4)):24-1/(4)];
figure(FigNr)take a look to the part 2 of the carpet plot function
clf
axes1 = axes(...
'FontSize',16,...
'LineWidth',1,...
'Box','on',...
'Parent',figure(FigNr));%,...
% 'CLim',[-20000 -5000]);
xlabel(axes1,'Tag im Jahr');
ylabel(axes1,'Uhrzeit');
grid(axes1,'off');
hold(axes1,'all');
set(gca,'XLim',([1 365]),'YLim',([0 (24-1/(4*60))]))%,'ZLim',([-20000 -5000]))
surf(x,y,DATA,'EdgeColor','none',...
'LineWidth',1,'Parent',axes1);
view(0,90)
colorbar1 = colorbar('peer',...
axes1,'EastOutside',...
'Box','on',...
'FontSize',16,...
'XLim',[-0.5 1.5], 'YLim', [-20000 -5000],...
'CLim',[0 6]);
%load('MyColormaps','mycmap')
set(figure(FigNr),'Colormap',colormap)
% set(axes1,'CLim', [0 4])