Matlab进阶绘图第66期—特征渲染的滑珠气泡图

特征渲染的滑珠气泡图是在滑珠散点图的基础上，添加散点大小与颜色参数，通过散点的尺寸与颜色表示两个额外的特征。

由于Matlab中没有现成的函数绘制特征渲染的滑珠气泡图，因此需要大家自行解决。

本文利用自己制作的BubbleScatter 工具，进行特征渲染的滑珠气泡图的绘制，先来看一下成品效果：

特别提示：本期内容『数据+代码』已上传资源群中，加群的朋友请自行下载。有需要的朋友可以关注同名公号【阿昆的科研日常】，后台回复关键词【全家桶】查看加入方式。

1. 数据准备

此部分主要是读取原始数据并初始化绘图参数。

复制代码

% 读取数据load data.mat% 初始化绘图参数X = data;ylabels = p;f1 = SZ;f2 = SZ2;

2. 颜色定义

作图不配色就好比做菜不放盐，总让人感觉少些味道。

但颜色搭配比较考验个人审美，需要多加尝试。

这里直接使用TheColor配色工具中的SCI权威配色库：

复制代码

C = TheColor('sci',2068);

3. 特征渲染的滑珠气泡图绘制

调用'BubbleScatter'命令，绘制初始特征渲染的滑珠气泡图。

复制代码

[s,idx] = BubbleScatter(X,f1,f2);bubblesize([5 20])s.MarkerFaceAlpha = 0.8;yl = ylabels(idx);hTitle = title('BubbleScatter with feature');hXLabel = xlabel('MeanDecreaseAccuracy');hYLabel = ylabel('Product');

4. 细节优化

为了插图的美观与信息完整性，对图形细节等进行美化：

复制代码

% 赋色colormap(C)% 坐标区调整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('Style','vertical',...    'BubbleSizeOrder','descending',...    'box','off',...    'Location','northeastoutside',...    'NumBubbles',3,... ...    'FontName', 'Helvetica',...    'FontSize', 9);colorbar('Position',[0.79,0.11,0.03,0.4])% 字体和字号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');

以上。