myrandplot.m

这是机械工业张德丰《MATLAB与外部程序接口编程》随书源码

function [out]=myrandplot(n)
%function [out]=myrandplot(n)
global randplotcolor;
if length(n)>1
    n=n(1);
end
out=rand(1, n);
if isempty(randplotcolor)
    randplotcolor=[0 0 1];
end
plot(out,'color',randplotcolor);