我想在Matlab中的对数轴上创建一个分散的饼图。我看到有关创建分散饼图(Scatter pie plot)的讨论,但它是在线性轴上进行的。在我的例子中,我只希望水平轴是对数的,垂直轴必须是线性的。
我使用亚伯拉罕安德森编写的代码:
function bubblepie2(xlist,ylist,slist,graph_data,graph_labels,graph_legend,xlab,ylab,lab)
% A Bubble Plot, Pie Chart Combination
% bubblepie(xlist,ylist,slist,graph_data,graph_labels,graph_legend,xlab,ylab,lab)
%
% Creates a plot with pie charts at (xlist, ylist) using graph_data, having
% size of the pie scaled by slist. Graph_labels contains a title for each
% pie chart, Graph_legend indicates the contents of graph_data, and lab is a
% binary value indicating whether pie chart labels are displayed.
%
% Example:
% x = -pi:1:pi;
% x = x';
% y = sin(x);
% s = 1.1+cos(x);
% graph_labels = mat2cell(x,ones(1,length(x)),1);
% graph_data = 10*rand(length(x),3);
% graph_legend = {'one','two','three'};
% xlab = 'radians';
% ylab = 'sin(x)';
% lab = 1;
%
% bubblepie(x,y,s,graph_data,graph_labels,graph_legend,xlab,ylab,lab)
%
% title('BubblePie Plot')
%
% Abraham Anderson
% July 30, 2007
graph_max_size = 0.25;
graph_min_size = 0.05;
graph_range = graph_max_size-graph_min_size;
canvas_max = 1-graph_max_size/2;
canvas_min = 0.1;
canvas_range = canvas_max-canvas_min;
maxx = max(xlist);
maxy = max(ylist);
minx = min(xlist);
miny = min(ylist);
maxs = max(slist);
figure
h0 = axes('position',[canvas_min,canvas_min,canvas_range,canvas_range], ...
'xlim',[minx maxx],'ylim',[miny maxy]);
set(get(gca,'XLabel'),'String',xlab)
set(get(gca,'YLabel'),'String',ylab)
text(0.1*maxx+minx,maxy-0.1*maxy,{'PieChart Groups (CCW):'graph_legend{:}},'verticalalignment','top');
if lab
for i = 1:size(graph_data,1)
s = slist(i)/maxs*graph_range+graph_min_size;
x = (xlist(i)-minx)/(maxx-minx)*canvas_range+canvas_min-s/2;
y = (ylist(i)-miny)/(maxy-miny)*canvas_range+canvas_min-s/2;
d = graph_data(i,:);
if sum(d)==0
continue
end
d(d==0) = 0.1;
axes('position',[x y s s])
pie(d)
title(graph_labels{i})
end
else
for i = 1:size(graph_data,1)
s = slist(i)/maxs*graph_range+graph_min_size;
x = (xlist(i)-minx)/(maxx-minx)*canvas_range+canvas_min-s/2;
y = (ylist(i)-miny)/(maxy-miny)*canvas_range+canvas_min-s/2;
d = graph_data(i,:);
if sum(d)==0
continue
end
d(d==0) = 0.1;
axes('position',[x y s s])
pie(d,{'' '' '' ''})
title(graph_labels{i})
end
end
set(gcf,'Currentaxes',h0)
有谁知道必须改变什么?我想我必须改变围绕轴/ set / get命令的东西,但我不知道要改变什么。我通过'loglog'替换'轴'做了几次尝试,但没有运气。我是set / get命令的noob,非常感谢任何帮助。