济南网站建设设计公司,sql网站源码,家装公司排名前20,公司网站建设总结报告应粉丝要求#xff0c;出一个类似于github热图的日历热力图#xff0c;大概长这样#xff1a; 依旧工具函数放在文末#xff0c;如有bug请反馈并去gitee下载更新版。 使用教程
使用方式有以下几种会慢慢讲到#xff1a;
heatmapDT(Year,T,V)heatmapDT(Year,T,V,MonLim)h…应粉丝要求出一个类似于github热图的日历热力图大概长这样 依旧工具函数放在文末如有bug请反馈并去gitee下载更新版。 使用教程
使用方式有以下几种会慢慢讲到
heatmapDT(Year,T,V)heatmapDT(Year,T,V,MonLim)heatmapDT(ax,Year,T,V)heatmapDT(ax,Year,T,V,MonLim)
基础使用
随便构造一组数据
% 构造一组比较连续但是有波动的数据
Tdatetime(2022,1,1):datetime(2022,12,31);
tlinspace(1,length(T),10);
tVrand(size(t));
Vinterp1(t,tV,1:length(T))rand(1,[length(T)])./3;这组数据大概是这样的 绘制日历热力图并调整大小
% 绘制日历热图
heatmapDT(2022,T,V)% 调整图窗和坐标区域大小
set(gcf,Position,[100,500,1500,260])
set(gca,Position,[.03,.03,1-.1,1-.1])修改colormap(当然clim和caxis也能用)。
colormap(pink)随便再换点颜色 自己定义点颜色
CM[1.0000 1.0000 0.85100.9487 0.9800 0.73690.8617 0.9458 0.69950.7291 0.8938 0.71090.5237 0.8139 0.73080.3433 0.7465 0.75580.2036 0.6610 0.76290.1155 0.5504 0.74440.1298 0.4050 0.67590.1398 0.2788 0.61600.1141 0.1793 0.51620.0314 0.1137 0.3451];
CMXlinspace(0,1,size(CM,1));
CMXXlinspace(0,1,256);
CM[interp1(CMX,CM(:,1),CMXX,pchip), ...interp1(CMX,CM(:,2),CMXX,pchip), ...interp1(CMX,CM(:,3),CMXX,pchip)];
colormap(CM)当然可以配合slanCM配色工具https://slandarer.blog.csdn.net/article/details/127719784 使用效果 空缺值
比如数据是2022年的但是只有前半年数据(有空缺那么空缺部分会用灰色补齐)
% 构造一组比较连续但是有波动的数据
Tdatetime(2022,1,1):datetime(2022,6,30);
tlinspace(1,length(T),10);
tVrand(size(t));
Vinterp1(t,tV,1:length(T))rand(1,[length(T)])./3;% 绘制日历热图
heatmapDT(2022,T,V)% 调整图窗和坐标区域大小
set(gcf,Position,[100,500,1500,260])
set(gca,Position,[.03,.03,1-.1,1-.1])只画部分月份
猜到会有人想要这样的功能只需要添加MonLim参数[a,b]即可其中1≤a≤b≤121\leq a\leq b\leq 121≤a≤b≤12比如绘制二月热力图
% 构造一组比较连续但是有波动的数据
Tdatetime(2022,1,1):datetime(2022,12,31);
tlinspace(1,length(T),10);
tVrand(size(t));
Vinterp1(t,tV,1:length(T))rand(1,[length(T)])./3;% 绘制日历热图
heatmapDT(2022,T,V,[2,2])% 调整图窗和坐标区域大小
set(gcf,Position,[100,100,800,600])
set(gca,Position,[.15,.15,1-.3,1-.3])2-3月
heatmapDT(2022,T,V,[2,3])1-3月
heatmapDT(2022,T,V,[1,3])多子图
就将第一个参数设置为坐标区域即可,以下不用随机生成的数据了用一个matlab Financial Toolbox工具箱自带的数据
load SimulatedStock.mat TTMW.Time;
VTMW.High;% 绘制三个热力图
ax1axes(gcf,Position,[.06,2/3.01,1-.07,1/3-.03]);
heatmapDT(ax1,2013,T,V)
ax2axes(gcf,Position,[.06,1/3.01,1-.07,1/3-.03]);
heatmapDT(ax2,2014,T,V)
ax3axes(gcf,Position,[.06,0.01,1-.07,1/3-.03]);
heatmapDT(ax3,2015,T,V)% 绘制标题并调整位置
TTtitle(ax1,{Simulated Stock heatmap},FontSize,18,FontWeight,bold,FontName,Times New Roman);
TT.Position(2)-.1;set(gcf,Position,[100,100,1200,620])随便试试自带colormap配色 随便试试slanCM工具配色 工具函数完整代码
function heatmapDT(varargin)
% author:slandarer
% Zhaoxu Liu / slandarer (2023).
% calendar heatmap (https://www.mathworks.com/matlabcentral/fileexchange/125835-calendar-heatmap),
% MATLAB Central File Exchange. 检索来源 2023/3/7.% 参数获取
if isa(varargin{1},matlab.graphics.axis.Axes)axvarargin{1};varargin(1)[];
elseaxgca;
end
YYvarargin{1};
DTvarargin{2};
VALvarargin{3};
MLim[1,12];
tryMLimvarargin{4};
catch
end% 截取该年份日期及数值
BeginTimedatetime(YY,1,1);
EndTimedatetime(YY1,1,1);
VALVAL(DTBeginTimeDTEndTime);
DTDT(DTBeginTimeDTEndTime);
% 范围计算
DayName{Mon,Tue,Wed,Thu,Fri,Sat,Sun};
if MLim12FDTdatetime(YY,MLim(1),1):(datetime(YY1,1,1)-1);
elseFDTdatetime(YY,MLim(1),1):(datetime(YY,MLim(2)1,1)-1);
end
[DayNumber,~]weekday(FDT);
DayNumber(DayNumber1)8;
DayNumberDayNumber-1;
TBtabulate(DayNumber);
XLenmax(TB(:,2));
% 坐标区域修饰
hold on
ax.DataAspectRatio[1,1,1];
ax.YLim[.5,7.5];
ax.YDirreverse;
ax.YTick1:7;
ax.YTickLabelDayName;
ax.YAxisLocationright;
ax.FontNameMonospaced;
ax.FontWeightbold;
ax.XColor[.3,.3,.3];
ax.YColor[.3,.3,.3];
% ax.Title.Stringnum2str(YY);
ax.FontSize12;
% ax.LooseInset[0,0,0,0];
FHdlfill(ax,ax.XLim([1,1,2,2]),ax.YLim([1,2,2,1]),[1,1,1],EdgeColor,w,LineWidth,2);
% 绘制灰色方块
xs[-.5,-.5,.5,.5];ys[-.5,.5,.5,-.5];
XListzeros(1,length(FDT));
YListzeros(1,length(FDT));
for i1:length(FDT)XList(i)sum(DayNumber1(1:length(FDT)i))1;YList(i)DayNumber(i);fill(ax,xsXList(i),ysYList(i),[.8,.8,.8],EdgeColor,w,LineWidth,1)
end
% 绘制热力方块
for i1:length(FDT)tPosfind(FDT(i)DT, 1);if ~isempty(tPos)fill(ax,xsXList(i),ysYList(i),VAL(tPos),EdgeColor,w,LineWidth,1)end
end
% 绘制外轮廓
MonNumbermonth(FDT);
XDListzeros(1,MLim(2)-MLim(1)1);
n1;
for iMLim(1):MLim(2)XUXList(MonNumberiDayNumber1);plot([min(XU)-.5,max(XU).5],[.5,.5],Color,[0,0,0],LineWidth,1);XDXList(MonNumberiDayNumber7);XDList(n)mean(XD);nn1;plot([min(XD)-.5,max(XD).5],[7.5,7.5],Color,[0,0,0],LineWidth,1);YLYList(MonNumberiXListmax(XU));plot([max(XU).5,max(XU).5],[min(YL)-.5,max(YL).5],Color,[0,0,0],LineWidth,1);plot([max(XU)-.5,max(XU)-.5],[min(max(YL)1,8)-.5,7.5],Color,[0,0,0],LineWidth,1);plot([max(XU).5,max(XU)-.5],[max(YL).5,max(YL).5],Color,[0,0,0],LineWidth,1);if iMLim(1)YRYList(MonNumberiXListmin(XD));plot([min(XD)-.5,min(XD)-.5],[min(YR)-.5,max(YR).5],Color,[0,0,0],LineWidth,1);plot([min(XD).5,min(XD).5],[max(min(YR)-1,0).5,.5],Color,[0,0,0],LineWidth,1);plot([min(XD)-.5,min(XD).5],[min(YR)-.5,min(YR)-.5],Color,[0,0,0],LineWidth,1);end
end
ax.XLim[.5,max(XList).5];
FHdl.XDataax.XLim([1,1,2,2]);
ax.XTickXDList;
MonName{Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec};
ax.XTickLabelMonName(MLim(1):MLim(2));
% 设置colormap
CM[1.0000 1.0000 0.89800.9833 0.9937 0.80600.9608 0.9851 0.71970.8980 0.9600 0.67370.8280 0.9312 0.62820.7359 0.8915 0.58430.6369 0.8486 0.54040.5260 0.8005 0.49650.4131 0.7482 0.44520.2980 0.6918 0.38670.2157 0.6196 0.33070.1529 0.5380 0.27630.0824 0.4737 0.24390.0092 0.4152 0.21880 0.3438 0.19010 0.2706 0.1608];
disp(char([64 97 117 116 104 111 114 32 58 32,...115 108 97 110 100 97 114 101 114]))
CMXlinspace(0,1,size(CM,1));
CMXXlinspace(0,1,256);
CM[interp1(CMX,CM(:,1),CMXX,pchip), ...interp1(CMX,CM(:,2),CMXX,pchip), ...interp1(CMX,CM(:,3),CMXX,pchip)];
colormap(ax,CM);
CBcolorbar(ax);
CB.LineWidth1;
% 绘制年份标题
text(ax,-0.2,4,num2str(YY),Rotation,90,HorizontalAlignment,center,VerticalAlignment,baseline,...FontSize,27,FontWeight,bold,Color,[.6,.6,.6])
end
