- 博客(0)
- 资源 (13)
- 收藏
- 关注
神经网络matlab源程序代码
部分代码L:
P=[]
%被分类的对象数据
T=[ ]';
%描述分类结果
rang=[0 1;..;0 1];
%描述输入向量的最大值和最小值
net=newff(rang,[ , ],{'tansig','logsig'},'trainlm');
%tansig输出范围是[-1 1] logsig输出范围是[0 1]
%在三层网络中,隐含层神经元个数n2和输入层神经元个数n1关系约为 n2=2*n1+1
%net=newff(PR,[S1 S2...SNl],{TF1 TF2...TFNl},BTF,BLF,PF) takes,
%PR -- R x 2 matrix of min and max values for R input elements
%Si -- Size of ith layer, for Nl layers
%TFi -- Transfer function of ith layer, default = 'tansig'
2011-03-13
深度优先搜索matlab源程序代码
部分代码:
function flag = wj_wfs_con(D)
%输入邻接矩阵,如果联通返回1,否则返回零。
L = size(D,1);
visited = [1];
while(length(visited) < L)
D(visited, visited) = 0;
pos = D(visited,:);
if sum(sum(pos)) == 0
flag = 0;
2011-03-13
模拟退火matlab源程序代码TSP问题
部分代码L:
function [f,T]=TUIHUO_TSP(d,t0,tf,X)
%TSP问题(货郎担问题,旅行商问题)的模拟退火算法通用malab源程序
% f目标最优值,T最优路线,d距离矩阵,t0初始温度,tf结束温度
[m,n]=size(d);
L=n*n;
t=t0;
pi0=1:n; %初始路径 1,2,...,n
min_f=inf; %记录最短路径的长度值
for k=1:n-1
min_f=min_f+d(pi0(k),pi0(k+1));
end
min_f=min_f+d(pi0(n),pi0(1));
2011-03-13
模糊聚类matlab源程序代码
部分代码:
%模糊聚类程序
function f=mujl(x,lamda)
%输入原始数据以及lamda的值
if lamda>1
disp('error!') %错误处理
end
[n,m]=size(x);
xmax=max(x);xmin=min(x);
x=(x-xmin(ones(n,1),:))./(xmax(ones(n,1),:)-xmin(ones(n,1),:))
2011-03-13
AHP层次分析法matlab源程序代码
部分代码:
disp('请输入判断矩阵A(n阶)');
A=input('A=');
[n,n]=size(A);
x=ones(n,100);
y=ones(n,100);
m=zeros(1,100);
m(1)=max(x(:,1));
y(:,1)=x(:,1);
x(:,2)=A*y(:,1);
2011-03-13
背包问题遗传算法matlab源程序代码
部分代码:
function Population1=GA_tubian(Population,pe_tubian)
%遗传算法突变算子
%pe为突变概率
Population1=Population;
n=length(Population(:,1));
m=length(Population(1,:));
for i=1:n
for j=1:m
test=rand;
if test<pe_tubian
Population1(i,j)=1-Popula
2011-03-13
gm灰色模型matlab源程序代码
部分代码(内含3个例子,1分绝对划算):
function yc0=GM1(x0,N)
%x0 is the original data ,
%N is the number you want to predict.
n=length(x0);
for i=1:n
x1(i)=sum(x0(1:i));
end
% for k=2:n % 紧邻均生成 z
% z(k)=0.5*x1(k)+0.5*x1(k-1);
2011-03-13
fisher判别matlab源程序代码
部分代码:
function [a,b]=fisher(A,B,X,h)
%A,B表示A,B类的数据,X表示未知类别的数据。
%A,B,X的列表示不同的指标,行表示一个个体。
%h为显著性水平。
average1=mean(A);
average2=mean(B);
m=size(A,1);
n=size(B,1);
p=size(A,2);
for i=1:p
2011-03-13
延迟模型matlab源程序代码
部分代码:
%% 应用三级三阶Runge-Kutta 方法与复合Gregory求积公式到问题(1.2,1.3,1.4)
%% 通用函数 [t,y]=main(ddefun,kernelfun,initialfun,lag,tspan,dimensional)
%% 其中 ddefun为右端函数,kernelfun为积分核函数,initialfun为初始函数,lag为延迟量,
%% tspan为求解区间,dimensional为问题维数
% %%%% 问题1.2
% [t,x]=main(@fun_f1,@fun_g1,@fun_varphi1,0.8,[0,8],1);
%plot(t,x)
%xlabel('\it{t}');
%ylabel('\it{x(t)}');
%%%% 问题1.3
%[t,x]=main(@fun_f2,@fun_g2,@fun_varphi2,0.8,[0,8],1);
%plot(t,x)
% xlabel('\it{t}');
% ylabel('\it{x(t)}');
%%% 问题1.4
[t,x]=main(@fun_f3,@fun_g3,@fun_varphi3,1/6,[0,5],2);
x1=x(:,1);
2011-03-13
元胞自动机matlab源程序模拟气体交换碰撞
部分代码:
%CA driver
%HPP-gas
clear all
clf
nx=52;
ny=100;
z=zeros(nx,ny);
o=ones(nx,ny);
sand=z;
sandNew=z;
gnd=z;
diag1=z;
diag2=z;
and12=z;
or12=z;
sums=z;
orsum=z;
gnd(1:nx,ny-3)=1 ; % right ground line
gnd(1:nx,3)=1 ; % left ground line
gnd(nx/4:nx/2-2,ny/2)=1; %the hole line
gnd(nx/2+2:nx,ny/2)=1; %the hole line
gnd(nx/4, 1:ny) = 1; %top line
gnd(3*nx/4, 1:ny) = 1 ;%bottom line
%fill the left side
r = rand(nx,ny);
sand(nx/4+1:3*nx/4-1, 4:ny/2-1) = r(nx/4+1:3*nx/4-1, 4:ny/2-1)<0.3;
2011-03-13
源包自动机matlab程序代码模拟森林大火
部分代码:
%
%CA driver
%
%forest fire
clf
clear all
n=100;
Plightning = .000005;
Pgrowth = .01; %.01
z=zeros(n,n);
o=ones(n,n);
veg=z;
sum=z;
imh = image(cat(3,z,veg*.02,z));%第一个是红的亮度;第二个是绿的亮度;第三个是蓝的亮度
set(imh, 'erasemode', 'none')
2011-03-13
linux连接校园网(图文)
ubuntu连接校园网 设置(图文)
>>Searching for server..
@@server found, requesting user name...
>>sending user name...
@@user name valid, requesting password...
>>sending password...
@@Password valid, authentication SUCCESS!!!:)
Keeping sending echo...
2011-03-12
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人