在之前的文章中分享了滑珠散点图的绘制方法:
在此基础上,添加尺寸参数,通过散点的大小表示一个额外的特征,便是滑珠气泡图。
由于Matlab中没有现成的函数绘制滑珠气泡图,因此需要大家自行解决。
本文利用自己制作的BubbleScatter 工具,进行滑珠气泡图的绘制,先来看一下成品效果:
特别提示:本期内容『数据+代码』已上传资源群中,加群的朋友请自行下载。有需要的朋友可以关注同名公号【阿昆的科研日常】,后台回复关键词【全家桶】查看加入方式。
1. 数据准备
此部分主要是读取原始数据并初始化绘图参数。
% 读取数据load data.mat% 初始化绘图参数y = 1:length(data);x = data;ylabels = p;SZ = sz;
2. 颜色定义
作图不配色就好比做菜不放盐,总让人感觉少些味道。
但颜色搭配比较考验个人审美,需要多加尝试。
这里直接使用TheColor配色工具中的SCI权威配色库:
C = TheColor('sci',501);C1 = C(1,:);
3. 滑珠气泡图绘制
调用'BubbleScatter'命令,绘制初始滑珠气泡图。
[s,idx] = BubbleScatter(data,SZ,C1);bubblesize([5 15])s.MarkerFaceAlpha = 0.8;yl = ylabels(idx);hTitle = title('BubbleScatter');hXLabel = xlabel('MeanDecreaseAccuracy');hYLabel = ylabel('Product');
4. 细节优化
为了插图的美观与信息完整性,对图形细节等进行美化:
% 坐标区调整set(gca, 'Box', 'off', ... % 边框 'LineWidth', 1,... % 线宽 'XGrid', 'off', 'YGrid', 'on', ... % 网格 'TickDir', 'out', 'TickLength', [.005 .005], ... % 刻度 'XMinorTick', 'off', 'YMinorTick', 'off', ... % 小刻度 'XColor', [.1 .1 .1], 'YColor', [.1 .1 .1]) % 坐标轴颜色% 坐标轴刻度调整set(gca, 'YTick', 1:16,... 'Ylim' , [0.5 15.5], ... 'Xlim' , [-0.05 1.05], ... 'XTick', 0:0.2:1,... 'yticklabel',yl)% 气泡图图例blgd = bubblelegend('Location','southeastoutside',... 'Style','vertical',... 'BubbleSizeOrder','descending',... 'box','off',... 'NumBubbles',3,... ... 'FontName', 'Arial',... 'FontSize', 10);% 字体和字号set(gca, 'FontName', 'Arial', 'FontSize', 9)set([hXLabel, hYLabel], 'FontSize', 11, 'FontName', 'Arial')set(hTitle, 'FontSize', 12, 'FontWeight' , 'bold')% 背景颜色set(gcf,'Color',[1 1 1])% 添加上、右框线xc = get(gca,'XColor');yc = get(gca,'YColor');unit = get(gca,'units');ax = axes( 'Units', unit,... 'Position',get(gca,'Position'),... 'XAxisLocation','top',... 'YAxisLocation','right',... 'Color','none',... 'XColor',xc,... 'YColor',yc);set(ax, 'linewidth',1,... 'XTick', [],... 'YTick', []);
设置完毕后,以期刊所需分辨率、格式输出图片。
%% 图片输出figW = figureWidth;figH = figureHeight;set(figureHandle,'PaperUnits',figureUnits);set(figureHandle,'PaperPosition',[0 0 figW figH]);fileout = 'test';print(figureHandle,[fileout,'.png'],'-r300','-dpng');
以上。