在之前的文章中,分享了Matlab極坐標氣泡圖的繪制模板:
進一步,再來分享一下極坐標分組氣泡圖。
先來看一下成品效果:
?
特別提示:本期內容『數據+代碼』已上傳資源群中,加群的朋友請自行下載。有需要的朋友可以關注同名公號【阿昆的科研日常】,后臺回復關鍵詞【繪圖桶】查看加入方式。
模板中最關鍵的部分內容:
1. 數據準備
此部分主要是讀取數據并初始化繪圖參數。
% 讀取數據
load data.mat
% 初始化繪圖參數
R1 = r1;
R2 = r2;
TH1 = th;
TH2 = th;
SZ1 = sz1;
SZ2 = sz2;
2. 顏色定義
作圖不配色就好比做菜不放鹽,總讓人感覺少些味道。
但顏色搭配比較考驗個人審美,需要多加嘗試。
這里直接使用TheColor配色工具中的SCI權威配色庫:
%% 顏色定義
map = TheColor('sci',512);
C1 = repmat(map(1,1:3),10,1);
C2 = repmat(map(2,1:3),10,1);
3. 極坐標分組氣泡圖繪制
通過調用‘polarbubblechart’命令,繪制初始極坐標分組氣泡圖。
t = tiledlayout(1,1);
nexttile
p1 = polarbubblechart(TH1,R1,SZ1,C1);
hold on
p2 = polarbubblechart(TH2,R2,SZ2,C2);
hTitle = title('Polarbubble chart');
bubblesize([7 30])
4. 細節優化
為了插圖的美觀,對坐標軸細節等進行美化:
% 坐標區調整
set(gca, 'LineWidth',1,... % 線寬
'RGrid','on','ThetaGrid','on',... % 網格
'GridColor',[0 0 0],... % 網格顏色
'ThetaZeroLocation','right',... % 極角0位置
'TickDir', 'out', 'TickLength', [0 0], ... % 刻度
'RMinorTick', 'off', 'ThetaMinorTick', 'off', ... % 小刻度
'RAxisLocation',270,... % 極徑標簽位置
'RLim',[0 40],... % 極徑范圍
'ThetaDir', 'clockwise') % 極角方向
% legend
hLegend = legend('Sample1','Sample2','Linewidth',0.5);
hLegend.Layout.Tile = 'east';
% 氣泡尺寸
blgd = bubblelegend('Sz');
blgd.Layout.Tile = 'east';
bt = get(blgd,'Title');
bt.FontWeight = 'normal';
bt.FontName = 'Arial';
bt.FontSize = 9;
% 字體和字號
set(gca, 'FontName', 'Arial', 'FontSize', 11)
set(hTitle, 'FontName', 'Arial', 'FontSize', 12, 'FontWeight' , 'bold')
% 背景顏色
set(gcf,'Color',[1 1 1])
設置完畢后,以期刊所需分辨率、格式輸出圖片。
%% 圖片輸出
figW = figureWidth;
figH = figureHeight;
set(figureHandle,'PaperUnits',figureUnits);
set(figureHandle,'PaperPosition',[0?0?figW figH]);
fileout = 'test';
print(figureHandle,[fileout,'.png'],'-r300','-dpng');
以上。