概率神经网络源码matlab

clear
%提取训练样本
fid = fopen（‘E:\毕业设计\data\TrainSample.txt‘‘r‘）;
[Pcount]=fscanf（fid‘%d %d‘[5002000]）;
Tc = ones（12000）;
Tc（11001:2000）=1+Tc（11001:2000）;
% for i=1001:2000
%     Tc（1i）=Tc（1i）+1;
% end
fclose（fid）;

%训练概率神经网络
T = ind2vec（Tc）;
spread = 4.75;
net = newpnn（P T spread）;

%测试
%正常邮件
nn_test（net）;
nn_test_train（net）;
% fid_test = fopen（‘E:\毕业设计\data\TrainSample_ham.txt‘‘r‘）;
% [p_testcount]=fscanf（fid_test‘%d %d‘[5001000]）;
% count_ham = 0;
% for i=1:1000
%     a = si