www.gusucode.com > 《matlab图像处理与界面编程宝典》秦襄培 编著，每章的MATLAB源代码程序 > 第16章/代码16-9.txt

    
iptsetpref('ImshowAxesVisible','on')              % 显示图像轴坐标
I = zeros(100,100);                               % 生成全零矩阵
I(25:75, 25:75) = 1;                              % 产生一个正方形的黑框
theta = 0:180;                                    % 产生0°-180°的角度向量
[R,xp] = radon(I,theta);                          % radon变换
imshow(R,[],'Xdata',theta,'Ydata',xp,...          % 设置图像显示属性
            'InitialMagnification','fit')
xlabel('\theta (degrees)')                        % x轴标签
ylabel('x''')                                     % y轴标签
colormap(hot),                                    % 设置色彩索引图
colorbar                                          % 显示色彩索引条