line.asv

来自「关于质数的一些程序」· ASV 代码 · 共 13 行

function fun=line(x0,y0,x1,y1)
if(x0==x1) 
    y=y0:0.01:y1;
    plot(x0,y);
else if(y0==y1)
        x=x0:0.01:x1;
        plot(x,y0);
    else 
        x=x0:0.1:x1;
        y=y0+(y1-y0)*(x-x0)/(x1-x0);
        plot(x,y);
    end
end