matalignscanlines.m

这是我用Delphi和Matlab写的一个程序

function RLines = MatAlignScanlines(beta)
%  MATALIGNSCANLINES  Return the Matrix used for aligning the scanlines
%%  极线旋转变换矩阵
RLines = [cos(beta)  -sin(beta)  0
    sin(beta)  cos(beta)   0
    0          0           1];