matlab 神经网络 遥感图像分类 可用程序

一个可用的神经网络方法进行的 遥感图像分类，里面有数据，可以直接执行。

clear all;

%<----------------------------!运用BP网络进行图像分类--------------------------->
%读入样本10即遥感图像的背景
I=imread（‘10.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
%初始化输入矢量P和输出矢量T
P=[];
T=[];
P=[R;G;B];
T=[0;0;0];
[m n]=size（P）;
T=concur（Tn）;

%读入样本图像0
I=imread（‘0.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.1;0.3;0.5];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像1
I=imread（‘1.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.2;0.4;0.6];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像2
I=imread（‘2.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.3;0.2;0.7];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像3
I=imread（‘3.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.4;0.4;0.7];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像4
I=imread（‘4.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.5;0.5;0.4];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像5
I=imread（‘5.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.6;0.9;0.2];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像6
I=imread（‘6.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.7;0.2;0.8];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像7
I=imread（‘7.jpg‘）;
%将样本图像降维处理
R=I（::1）;
G=I（::2）;
B=I（::3）;
%灰度值归一化
R=im2double（R）;
G=im2double（G）;
B=im2double（B）;
[M N]=size（R）;
R=reshape（R‘[1 M*N]）;
G=reshape（G‘[1 M*N]）;
B=reshape（B‘[1 M*N]）;
P1=[R;G;B];
T1=[0.8;0.3;0.5];
P=[PP1];
[m n]=size（P1）;
T1=concur（T1n）;
T=[TT1];

%读入样本图像8
I=imread（‘8.jpg‘

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        686  2009-04-26 11:41  10061700423 李琛 BP神经网络作业\0.jpg

     文件        765  2009-04-26 12:19  10061700423 李琛 BP神经网络作业\1.jpg

     文件        643  2009-04-26 23:30  10061700423 李琛 BP神经网络作业\10.jpg

     文件        741  2009-04-26 12:21  10061700423 李琛 BP神经网络作业\2.jpg

     文件        644  2009-04-30 23:40  10061700423 李琛 BP神经网络作业\3.jpg

     文件        782  2009-04-26 12:14  10061700423 李琛 BP神经网络作业\4.jpg

     文件        726  2009-05-01 18:11  10061700423 李琛 BP神经网络作业\5.jpg

     文件        723  2009-05-01 18:10  10061700423 李琛 BP神经网络作业\6.jpg

     文件        755  2009-04-26 12:10  10061700423 李琛 BP神经网络作业\7.jpg

     文件        969  2009-05-02 17:52  10061700423 李琛 BP神经网络作业\8.jpg

     文件        641  2009-05-02 17:53  10061700423 李琛 BP神经网络作业\9.jpg

     文件       8052  2009-05-02 21:04  10061700423 李琛 BP神经网络作业\LiChen.m

    ..A.SH.     25088  2010-01-30 10:54  10061700423 李琛 BP神经网络作业\Thumbs.db

     文件     623984  2009-04-12 10:09  10061700423 李琛 BP神经网络作业\tm2000mask.jpg

     文件      96641  2009-05-02 20:06  10061700423 李琛 BP神经网络作业\tm2003mask.jpg

     文件     696549  2009-04-12 10:15  10061700423 李琛 BP神经网络作业\tm2005mask.jpg

     目录          0  2009-12-14 21:40  10061700423 李琛 BP神经网络作业

----------- ---------  ---------- -----  ----

              1458389                    17