Thursday, November 22, 2007

carpetplot with matlab - part 2

hi, i have made some modifications to the carpetplot function.

here they are




function carpetplot(data,FigNr)

max_zeilen = 24;
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 %DATA=flipud(DATA); x=[1:1:365]; y=[0:1:23]; %% figure(FigNr) clf axes1 = axes(... 'FontSize',12,... 'LineWidth',1,... 'Box','on',... 'Parent',figure(FigNr),... 'YDir','reverse',... 'YTick',[0 4 8 12 16 20 ],... 'PlotBoxAspectRatio',[1 1 1]); xlabel(axes1,'Tage im Jahr'); ylabel(axes1,'Uhrzeit'); grid(axes1,'off'); hold(axes1,'all'); set(gca,'XLim',([1 365]),'YLim',([0 23]))%,'ZLim',([-20000 -5000])) surf(x,y,DATA,'EdgeColor','none',... 'LineWidth',1,'Parent',axes1); view(0,90) colorbar('Fontsize',12) annotation(gcf,'textarrow',[0.9 0.9],[0.7723 0.8215],... 'TextEdgeColor','none',... 'TextRotation',90,... 'FontSize',12,... 'String','Tempeartur in °C',... 'HeadStyle','none',... 'LineStyle','none');

No comments: