【图像几何】基于matlab GUI图像拉东变换【含Matlab源码 848期】

一、获取代码方式

获取代码方式1：
完整代码已上传我的资源：【图像几何】基于matlab GUI图像拉东变换【含Matlab源码 848期】

获取代码方式2：
通过订阅紫极神光博客付费专栏，凭支付凭证，私信博主，可获得此代码。

备注：
订阅紫极神光博客付费专栏，可免费获得1份代码（有效期为订阅日起，三天内有效）；

二、拉东变换简介

两维情况下radon变换大致可以这样理解：一个平面内沿不同的直线（直线与原点的距离为d，方向角为alfa）对f（x，y）做线积分，得到的像F(d,alfa)就是函数f的Radon变换。也就是说，平面（d，alfa）的每个点的像函数值对应了原始函数的某个线积分值。一个更直观的理解是，假设你的手指被一个很强的平行光源透射，你迎着光源看到的手指图像就是手指的光衰减系数的三维Radon变换（小小的推广）在给定方向（两个角坐标）的时候的值。

三、部分源代码

function varargout = Radon_trans(varargin)
% RADON_TRANS M-file for Radon_trans.fig
%      RADON_TRANS, by itself, creates a new RADON_TRANS or raises the existing
%      singleton*.
%
%      H = RADON_TRANS returns the handle to a new RADON_TRANS or the handle to
%      the existing singleton*.
%
%      RADON_TRANS('CALLBACK',hObject,eventData,handles,...) calls the local
%      function named CALLBACK in RADON_TRANS.M with the given input arguments.
%
%      RADON_TRANS('Property','Value',...) creates a new RADON_TRANS or raises the
%      existing singleton*.  Starting from the left, property value pairs are
%      applied to the GUI before Radon_trans_OpeningFunction gets called.  An
%      unrecognized property name or invalid value makes property application
%      stop.  All inputs are passed to Radon_trans_OpeningFcn via varargin.
%
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
%      instance to run (singleton)".
%
% See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help Radon_trans

% Last Modified by GUIDE v2.5 12-Jun-2009 20:15:52

% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @Radon_trans_OpeningFcn, ...
                   'gui_OutputFcn',  @Radon_trans_OutputFcn, ...
                   'gui_LayoutFcn',  [] , ...
                   'gui_Callback',   []);
if nargin & isstr(varargin{1})
    gui_State.gui_Callback = str2func(varargin{1});
end

if nargout
    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
else
    gui_mainfcn(gui_State, varargin{:});
end
% End initialization code - DO NOT EDIT


% --- Executes just before Radon_trans is made visible.
function Radon_trans_OpeningFcn(hObject, eventdata, handles, varargin)
% This function has no output args, see OutputFcn.
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% varargin   command line arguments to Radon_trans (see VARARGIN)
axes(handles.axes1);
img=imread('lena.bmp');
imshow(img);
axes(handles.axes2);
theta=0:180;
[R,xp]=radon(img,theta);
imagesc(theta,xp,R);
axes(handles.axes3);
[R,xp]=radon(img,[0 45]);
plot(xp,R(:,1));
axes(handles.axes4);
[R,xp]=radon(img,[0 45]);
plot(xp,R(:,2));
% Choose default command line output for Radon_trans
handles.output = hObject;

% Update handles structure
guidata(hObject, handles);

% UIWAIT makes Radon_trans wait for user response (see UIRESUME)
% uiwait(handles.figure1);


% --- Outputs from this function are returned to the command line.
function varargout = Radon_trans_OutputFcn(hObject, eventdata, handles)
% varargout  cell array for returning output args (see VARARGOUT);
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure
varargout{1} = handles.output;


% --- Executes during object creation, after setting all properties.
function popupmenu1_CreateFcn(hObject, eventdata, handles)
% hObject    handle to popupmenu1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: popupmenu controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end


% --- Executes on selection change in popupmenu1.
function popupmenu1_Callback(hObject, eventdata, handles)
% hObject    handle to popupmenu1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: contents = get(hObject,'String') returns popupmenu1 contents as cell array
%        contents{get(hObject,'Value')} returns selected item from popupmenu1
val=get(hObject,'value');
str=get(hObject,'string');
switch str{val};
    case 'lena'
        lena = [];
        lena = imread('lena.bmp');
        img = lena;
    case 'cameraman'
        cameraman=[];
        cameraman=imread('cameraman.tif');
        img=cameraman;
    case 'Saturn',
        saturn = [];
        load imdemos saturn
        img = saturn;
    case 'Tire',
        tire = [];
        load imdemos tire
        img = tire;
    case 'Pout',
        pout = [];
        load imdemos pout
        img = pout;
    case 'Trees',
        trees = [];
        load imdemos trees
        img = trees;
    case 'Quarter',
        quarter = [];
        load imdemos quarter
        img = quarter;
    case 'Circuit',
        circuit = [];
        load imdemos circuit
        img = circuit;
    case 'Rice',
        rice = [];
        load imdemos rice
        img = rice;
    case 'Fingerprint'
        fingerprint = [];
        fingerprint = imread('fingerprint.jpg');
        img = fingerprint;
    case 'Licenceplate'
        licenceplate = [];
        licenceplate = imread('licenceplate.jpg');
        img = licenceplate;
    case 'Haze'
        haze = [];
        haze = imread('haze.jpg');
        img = haze;
    case 'Cloudy'
        cloudy = [];
        cloudy = imread('cloudy.tif');
        img = cloudy;

end
axes(handles.axes1);
imshow(img);
axes(handles.axes2);
theta=0:180;
[R,xp]=radon(img,theta);
imagesc(theta,xp,R);
axes(handles.axes3);
[R,xp]=radon(img,[0 45]);
plot(xp,R(:,1));
axes(handles.axes4);
[R,xp]=radon(img,[0 45]);
plot(xp,R(:,2));


% --- Executes on button press in close_button.
function close_button_Callback(hObject, eventdata, handles)
% hObject    handle to close_button (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
close(Radon_trans);


  

 

  
1
  
2
  
3
  
4
  
5
  
6
  
7
  
8
  
9
  
10
  
11
  
12
  
13
  
14
  
15
  
16
  
17
  
18
  
19
  
20
  
21
  
22
  
23
  
24
  
25
  
26
  
27
  
28
  
29
  
30
  
31
  
32
  
33
  
34
  
35
  
36
  
37
  
38
  
39
  
40
  
41
  
42
  
43
  
44
  
45
  
46
  
47
  
48
  
49
  
50
  
51
  
52
  
53
  
54
  
55
  
56
  
57
  
58
  
59
  
60
  
61
  
62
  
63
  
64
  
65
  
66
  
67
  
68
  
69
  
70
  
71
  
72
  
73
  
74
  
75
  
76
  
77
  
78
  
79
  
80
  
81
  
82
  
83
  
84
  
85
  
86
  
87
  
88
  
89
  
90
  
91
  
92
  
93
  
94
  
95
  
96
  
97
  
98
  
99
  
100
  
101
  
102
  
103
  
104
  
105
  
106
  
107
  
108
  
109
  
110
  
111
  
112
  
113
  
114
  
115
  
116
  
117
  
118
  
119
  
120
  
121
  
122
  
123
  
124
  
125
  
126
  
127
  
128
  
129
  
130
  
131
  
132
  
133
  
134
  
135
  
136
  
137
  
138
  
139
  
140
  
141
  
142
  
143
  
144
  
145
  
146
  
147
  
148
  
149
  
150
  
151
  
152
  
153
  
154
  
155
  
156
  
157
  
158
  
159
  
160
  
161
  
162
  
163
  
164
  
165
  
166
  
167
  
168
  
169
  
170
  
171
  
172
  
173
  
174
  
175
  
176
  
177
  
178
  
179
  
180
  
181
  
182
  
183
  
184
  
185
  
186
  
187
  
188
 

四、运行结果

五、matlab版本及参考文献

1 matlab版本
2014a

2 参考文献
[1] 蔡利梅.MATLAB图像处理——理论、算法与实例分析[M].清华大学出版社，2020.
[2]杨丹,赵海滨,龙哲.MATLAB图像处理实例详解[M].清华大学出版社，2013.
[3]周品.MATLAB图像处理与图形用户界面设计[M].清华大学出版社，2013.
[4]刘成龙.精通MATLAB图像处理[M].清华大学出版社，2015.
[5]陈浩,方勇,朱大洲,王成,陈子龙.基于蚁群算法的玉米植株热红外图像边缘检测[J].农机化研究. 2015,37(06)

文章来源: qq912100926.blog.csdn.net，作者：海神之光，版权归原作者所有，如需转载，请联系作者。

原文链接：qq912100926.blog.csdn.net/article/details/116207523