⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rbfnet_main.m

📁 matlab写的人工神经网络的例子
💻 M
字号:
close all
clear all

net=RBFnet_creat;
theta=0:179;

while(1)
    num=input('Please input the images name :','s');   % 提示输入待识别的图片的名称(输入1~8的数字即可)
    if abs(num)<abs('1') || abs(num)>abs('8')          % 输入不存在的图片名称时退出程序 
        close all
        clear all
        return
    else
        m=strcat('test',num,'.jpg');        % 将样本图片的文件名合并成字符串
        x=imread(m);                        % 读入样本图片
        subplot(2,2,1);
        imshow(x);                          % 显示原始图
        title('原始图像');

        level=graythresh(x);                % 自动计算灰度阈值
        bw=im2bw(x,level);                  % 将读入的图片变成二值图像
        subplot(2,2,2);
        imshow(bw);                         % 显示二值图
        title('二值图像');

        [R,xp]=radon(bw,theta,180);
        subplot(2,2,3);
        imagesc(theta,xp,R)                 % 显示radon变换的图
        title('radon变换图像');
        
        [v,d]=eig(R);                       % 计算ht的特征值
        for k=1:180
            p(k,1)=real(d(k,k));            % 将特征值作为网络的输入
        end
       
        r=sim(net,p) ;                      % 对网络进行仿真
        r=round(r);
        subplot(2,2,4);                     % 画出识别出的图
        if r(1,1)==0 && r(2,1)==0 && r(3,1)==1
            tr=imread('T.jpg');
            imshow(tr);
            title('识别结果');
        elseif  r(1,1)==0 && r(2,1)==1 && r(3,1)==0
            sq=imread('S.jpg');
            imshow(sq); 
            title('识别结果');
        else  
            error('wrong');
        end 
    end
end    

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -