matlab源程序 条状图的绘制

matlab源程序，可以用不同的斜线、点阵来填充条状图，代码详细且有注释，适合对画图要求较高的同学

function ADbar（xyw）;
% this file is for filling with array dot.
%用点阵填充的条状图
% x is the data at x-axis
% y is the data at y-axis
% w is the width of bar
%  Example:
%     ADbar（1:6rand（16）0.4）;
Nx=8;  % Nx is the total number of array at x-axis.
Ny=40; % Ny is the total number of random dot of highest bar
for k=1:length（x）;
    xk=x（k）;yk=y（k）;
    xx=linspace（xk-wxk+wNx）;
    yy=linspace（0ykround（Ny*yk/max（y）））;
    plot（[xk-wxk-wxk+wxk+w][0ykyk0]‘k‘）;
    hold on;
    [xnyn]=meshgrid（xxyy）;
    xn=xn（2:end-12:end-1）;
    yn=yn（2:end-12:end-1）;
    plot（xnyn‘k.‘）;
end
xL=get（gca‘Xlim‘）;
xt=get（gca‘Xtick‘）;
set（gca‘Xlim‘[min（x）max（xL）]-[xt（2）-xt（1）0]）;
%hold off;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        733  2009-05-29 10:32  bar\ADbar.m

     文件        291  2009-05-29 10:51  bar\blankbar.m

     文件       1017  2009-05-29 10:29  bar\gridbarl.m

     文件       1546  2009-05-29 10:40  bar\gridbarr.m

     文件        609  2009-05-29 10:30  bar\Randdbar.m

     目录          0  2009-06-16 09:37  bar

----------- ---------  ---------- -----  ----

                 4196                    6