柱状图中怎么加斜线或者点状图例？

hitzk

请问在matlab中怎么将柱状图的图例中的填充成斜线或者点状的呀？

我在matlab的Figure Properties中没找到怎么改呀！请大家指点一下了！

ChaChing

自己产生一个斜线或点状的图档 dot.tif, 再使用
[x,y,z]=cylinder; I=imread('dot.tif'); warp(x,y,z,I);
可以吗?!

sogooda

这个问题好像是不能通过更改Figre Properties来实现的。下面的程序可以实现这个功能，不过是先按照图像处理的方法来做的。
主函数

1. 
   
2. function applyhatch(h,patterns,colorlist)
   
3. %APPLYHATCH Apply hatched patterns to a figure
   
4. %  APPLYHATCH(H,PATTERNS) creates a new figure from the figure H by
   
5. %  replacing distinct colors in H with the black and white
   
6. %  patterns in PATTERNS. The format for PATTERNS can be
   
7. %    a string of the characters '/', '\', '|', '-', '+', 'x', '.'
   
8. %    a cell array of matrices of zeros (white) and ones (black)
   
9. %
   
10. %  APPLYHATCH(H,PATTERNS,COLORS) maps the colors in the n by 3
    
11. %  matrix COLORS to PATTERNS. Each row of COLORS specifies an RGB
    
12. %  color value.
    
13. %
    
14. %  Note this function makes a bitmap image of H and so is limited
    
15. %  to low-resolution, bitmap output.
    
16. %
    
17. %  Example 1:
    
18. %    bar(rand(3,4));
    
19. %    applyhatch(gcf,'\-x.');
    
20. %
    
21. %  Example 2:
    
22. %    colormap(cool(6));
    
23. %    pie(rand(6,1));
    
24. %    legend('Jan','Feb','Mar','Apr','May','Jun');
    
25. %    applyhatch(gcf,'|-+.\/',cool(6));
    
26. %
    
27. %  See also: MAKEHATCH
    
28. 
    
29. %  By Ben Hinkle, bhinkle@mathworks.com
    
30. %  This code is in the public domain.
    
31.   
    
32. oldppmode = get(h,'paperpositionmode');
    
33. oldunits = get(h,'units');
    
34. set(h,'paperpositionmode','auto');
    
35. set(h,'units','pixels');
    
36. figsize = get(h,'position');
    
37. if nargin == 2
    
38.   colorlist = [];
    
39. end
    
40. bits = hardcopy(h,'-dzbuffer','-r0');
    
41. set(h,'paperpositionmode',oldppmode);
    
42. 
    
43. bwidth = size(bits,2);
    
44. bheight = size(bits,1);
    
45. bsize = bwidth * bheight;
    
46. if ~isempty(colorlist)
    
47.   colorlist = uint8(255*colorlist);
    
48.   [colors,colori] = nextnonbw(0,colorlist,bits);
    
49. else
    
50.   colors = (bits(:,:,1) ~= bits(:,:,2)) | ...
    
51.            (bits(:,:,1) ~= bits(:,:,3));
    
52. end
    
53. pati = 1;
    
54. colorind = find(colors);
    
55. while ~isempty(colorind)
    
56.   colorval(1) = bits(colorind(1));
    
57.   colorval(2) = bits(colorind(1)+bsize);
    
58.   colorval(3) = bits(colorind(1)+2*bsize);
    
59.   if iscell(patterns)
    
60.     pattern = patterns{pati};
    
61.   elseif isa(patterns,'char')
    
62.     pattern = makehatch(patterns(pati));
    
63.   else
    
64.     pattern = patterns;
    
65.   end
    
66.   pattern = uint8(255*(1-pattern));
    
67.   pheight = size(pattern,2);
    
68.   pwidth = size(pattern,1);
    
69.   ratioh = ceil(bheight/pheight);
    
70.   ratiow = ceil(bwidth/pwidth);
    
71.   bigpattern = repmat(pattern,[ratioh ratiow]);
    
72.   if ratioh*pheight > bheight
    
73.     bigpattern(bheight+1:end,:) = [];
    
74.   end
    
75.   if ratiow*pwidth > bwidth
    
76.     bigpattern(:,bwidth+1:end) = [];
    
77.   end
    
78.   bigpattern = repmat(bigpattern,[1 1 3]);
    
79.   color = (bits(:,:,1) == colorval(1)) & ...
    
80.           (bits(:,:,2) == colorval(2)) & ...
    
81.           (bits(:,:,3) == colorval(3));
    
82.   color = repmat(color,[1 1 3]);
    
83.   bits(color) = bigpattern(color);
    
84.   if ~isempty(colorlist)
    
85.     [colors,colori] = nextnonbw(colori,colorlist,bits);
    
86.   else
    
87.     colors = (bits(:,:,1) ~= bits(:,:,2)) | ...
    
88.              (bits(:,:,1) ~= bits(:,:,3));
    
89.   end
    
90.   colorind = find(colors);
    
91.   pati = (pati + 1);
    
92.   if pati > length(patterns)
    
93.     pati = 1;
    
94.   end
    
95. end
    
96. 
    
97. newfig = figure('units','pixels','visible','off');
    
98. imaxes = axes('parent',newfig,'units','pixels');
    
99. im = image(bits,'parent',imaxes);
    
100. fpos = get(newfig,'position');
     
101. set(newfig,'position',[fpos(1:2) figsize(3) figsize(4)+1]);
     
102. set(imaxes,'position',[0 0 figsize(3) figsize(4)+1],'visible','off');
     
103. set(newfig,'visible','on');
     
104. 
     
105. function [colors,out] = nextnonbw(ind,colorlist,bits)
     
106. out = ind+1;
     
107. colors = [];
     
108. while out <= size(colorlist,1)
     
109.   if isequal(colorlist(out,:),[255 255 255]) | ...
     
110.         isequal(colorlist(out,:),[0 0 0])
     
111.     out = out+1;
     
112.   else
     
113.     colors = (colorlist(out,1) == bits(:,:,1)) & ...
     
114.              (colorlist(out,2) == bits(:,:,2)) & ...
     
115.              (colorlist(out,3) == bits(:,:,3));
     
116.     return
     
117.   end
     
118. end
     

复制代码

需调用的函数

1. 
   
2. function A = makehatch(hatch)
   
3. %MAKEHATCH Predefined hatch patterns
   
4. %  MAKEHATCH(HATCH) returns a matrix with the hatch pattern for HATCH
   
5. %   according to the following table:
   
6. %      HATCH        pattern
   
7. %     -------      ---------
   
8. %        /          right-slanted lines
   
9. %        \          left-slanted lines
   
10. %        |          vertical lines
    
11. %        -          horizontal lines
    
12. %        +          crossing vertical and horizontal lines
    
13. %        x          criss-crossing lines
    
14. %        .          single dots
    
15. %
    
16. %  See also: APPLYHATCH
    
17. 
    
18. %  By Ben Hinkle, bhinkle@mathworks.com
    
19. %  This code is in the public domain.
    
20. 
    
21. n = 6;
    
22. A=zeros(n);
    
23. switch (hatch)
    
24. case '/'
    
25.   A = fliplr(eye(n));
    
26. case '\'
    
27.   A = eye(n);
    
28. case '|'
    
29.   A(:,1) = 1;
    
30. case '-'
    
31.   A(1,:) = 1;
    
32. case '+'
    
33.   A(:,1) = 1;
    
34.   A(1,:) = 1;
    
35. case 'x'
    
36.   A = eye(n) | fliplr(diag(ones(n-1,1),-1));
    
37. case '.'
    
38.   A(1:2,1:2)=1;
    
39. otherwise
    
40.   error(['Undefined hatch pattern "' hatch '".']);
    
41. end
    
42. 
    

复制代码

这个就是注释中例子的效果图。

白云星空

sogooda 发表于 2008-12-21 13:53

                               
登录/注册后可看大图

这个问题好像是不能通过更改Figre Properties来实现的。下面的程序可以实现这个功能，不过是先按照图像处理 ...

这个程序好像有问题吧，都运行出错