当前位置：MATLAB代做|MATLAB代写|MATLAB有偿编程 → matlab源码 → 算法设计
源码名称
源码大小
更新时间
人 气
· %%%%% 1.调原始图像矩阵
load wbarb; % 下载图像
f=X; % 原始图像
% f=[0 0 0 0 0 0 0 0 ;...
% 0 0 0 1 1 0 0 0 ;...
% 0 0 2 4 4 2 0 0 ;...
% 0 1 4 8 8 4 1 0 ;...
% 0 1 4 8 8 4 1 0 ;...
% 0 0 2 4 4...
运行环境：Win9X/2000/XP/2003/
授权方式：绿色版
推荐星级：
·
求根方法
优点
缺点
二分法
简单,可靠,易编程,对函数要求不高(连续,有根)
效率低,速度慢,不能求偶数根
迭代法
...
运行环境：Win9X/2000/XP/2003/
授权方式：绿色版
推荐星级：
· function varargout=saxplaxliu(varargin)
clc,clear
x0=0;xn=1.2;y0=1;h=0.1;
[y,x]=Adamswai2(x0,xn,y0,h);
n=length(x);
fprintf(' i x(i) y(i)\n');
for i=1:n
fprintf('%2d %4.4f %4.4f\n',i,x(i),y(i)...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· function varargout=saxplaxliu(varargin)
clear,clc
A=[0 -1 -1 -1 -1];B=[2 2 2 2 2];
C=-ones(1,5);;f=[1 0 0 0 0];
x=zgf(A,B,C,f)
function x=zgf(A,B,C,f)
%解 [b1 c1
% a2 b2 c2
% . . . *x=f
%
...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· function varargout=saxplax(varargin)
clear,clc
A=[-0.002 2 2
1 0.78125 0
3.996 5.5625 4];
b=[0.4;1.3816;7.4178];
A\b
x=GAusszhu(A,b)
function x=GAusszhu(A,b)
n=length(b);
x=b;
for i=1:n-1...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· function varargout=saxplax(varargin)
clear,clc
A=[6 2 1 -1
2 4 1 0
1 1 4 -1
-1 0 -1 3];
b=[6;1;5;-5];
x=GAusszhu(A,b)
function x=GAusszhu(A,b)
n=length(b);
x=b;
for i=1:n-1
for j=i+1:...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· 主程序：
function [r,n]=mulDNewton(x0,eps)
%牛顿下山法求非线形方程组的一个解
%初始迭代向量：x0
%迭代精度：eps
%解向量：r
%迭代步数：n
if nargin==1
tol=1.0e-4;
%输入的自变量的数目为1个时，精度...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· clc
close all
clear all
DosState.hFile = -1;
k = 0;
while 1
k = k + 1;
fprintf('%d/**\\\n', k);
fprintf(' 选择o，打开一个数据文件\n');
fprintf(' 选择p，显示数据参数信息\n');
fprintf(' 选...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· % 判断点与三角形的位置关系
function flag = PointInTriangle(P, Triangle, method)
if nargin == 2
method = 's';
end
flag = zeros(size(P, 1), 1);
switch method
case 'a'
for i = 1:size(P, 1)
...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %conjugate gradient methods
%method:FR,PRP,HS,DY,CD,WYL,LS
%精确线搜索,梯度终止准则
function [ m,k,d,a,X,g1,fv] = conjgradme( G,b,c,X,e,method)
if nargin<6
error('输入参数必须为6');
end
n=leng...
运行环境：Win9X/2000/XP/2003/
授权方式：绿色版
推荐星级：
· clc;
clear;
close all;
warning off;
load Sunspot.txt
%YEAR MON SSN DEV
%画出导入的活动数据
YEAR = Sunspot(:,1);
MON = Sunspot(:,2);
SSN = Sunspot(:,3); %sun spot number
DEV = Sunspot(...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· function varargout=zl(varargin)
clear,clc
xx=0:0.1:10;
x=0:10;
y=[0 0.79 1.53 2.19 2.71 3.03 3.27 2.89 3.06 3.19 3.29];
fd=[0 0];
n=length(xx);
yx0=xx;
for i=1:n
yx0(i)=splineL(x,y,fd,xx(i))...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %主函数
tic;
clear all；
clc;
%元胞数组存放人工鱼
global afs;
global afs_x;
global afs_y;
global afs_value;
global af_total;%人工鱼总数
global iterate_times;%迭代次数
global b_x;%全局最优...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 不用分水岭进行分割
I=imread('rice.png');
J=imtophat(I,strel('disk',15));
bw=im2bw(J,graythresh(J));
bw_opened=bwareaopen(bw,5);
rgb1=label2rgb(L1, 'spring', 'c', 'shuffle');
figure
subplot(1...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· fabric = imread('fabric.png');%读取图像
figure; subplot(121); imshow(fabric), %显示
title('fabric');
load regioncoordinates;%下载颜色区域坐标到工作空间
nColors = 6;
sample_regions = false([size(f...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
·
标准化后的测试数据集%随机选取中心平方为样本各点的协方差之和 R(i,j)=((x(i,:)-c(j,:)))*((x(i,:)-c(j,:))');
R(i,j)=exp(-R(i,j)./delta(j));
end
end
p=R;
%建模tE=tt-ty;
tSSE=sse(tE);
tMSE...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· % 聚丙烯/蒙脱土纳米复合材料的双指标性能的RBF预测模型
%t_data为原始数据，其中前三列是输入向量，后两列是输出的目标向量
t_data=[
1 10 80 33.92 69.3
1 20 100 34.49 34.7
1 30 50 34.38 18.7
3 10 50 3...
运行环境：Win9X/2000/XP/2003/
授权方式：免费版
推荐星级：
· %% Part1:ELM的回归拟合——基于近红外光谱的汽油辛烷值预测
clear all
clc
%% 训练集/测试集产生
load spectra_data.mat
% 随机产生训练集和测试集
temp = randperm(size(NIR,1));
% 训练集&mdash...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 导入数据
load concrete_data.mat
% 随机产生训练集和测试集
n = randperm(size(attributes,2));
% 训练集——80个样本
p_train = attributes(:,n(1:80))';
t_...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 导入数据
load BreastTissue_data.mat
% 随机产生训练集和测试集
n = randperm(size(matrix,1));
% 训练集——80个样本
train_matrix = matrix(n(1:80),:);
tr...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 训练集/测试集产生
% 导入数据
load water_data.mat
% 数据归一化
attributes = mapminmax(attributes);
% 训练集——35个样本
P_train = attributes(:,1:35);...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 训练集/测试集产生
% 导入数据
load iris_data.mat
% 随机产生训练集和测试集
P_train = [];
T_train = [];
P_test = [];
T_test = [];
for i = 1:3
temp_input = fe...
运行环境：Win9X/2000/XP/2003/
授权方式：免费版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 训练集/测试集产生
load spectra_data.mat
% 随机产生训练集和测试集
temp = randperm(size(NIR,1));
% 训练集——50个样本
P_train = NIR(temp(1:50),:)';
T_...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境
clc;clear
%% 障碍物数据
position = load('barrier.txt');
plot([0,200],[0,200],'.');
hold on
B = load('barrier.txt');
xlabel('km','fontsize',12)
ylabel('km','fontsize',12)
title('二...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 清空环境变量
clear all
clc
%% 导入数据
load citys_data.mat
%% 计算城市间相互距离
n = size(citys,1);
D = zeros(n,n);
for i = 1:n
for j = 1:n
if i ~= j
D(i,j) = sqrt(sum((citys(i,:) - ...
运行环境：Win9X/2000/XP/2003/
授权方式：免费版
推荐星级：
· function [obj,center,U]=FCMfun(X,cluster_n,center,options)
%% FCM主函数
% 输入
% X：样本数据
%cluster_n：聚类数
% center：初始聚类中心矩阵
% options：设置幂指数，最大迭代次数，目标函数的终止容限...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· clc;
clear;
close all;
%%
tic
T0=1000; % 初始温度
Tend=1e-3; % 终止温度
L=500; % 各温度下的迭代次数（链长）
q=0.9; %降温速率
%% 加载数据
load CityPosition1;
%%
D=Distanse(X); %计算距离矩阵...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· clc
clear all
close all
tic
figure(1);hold on
ezplot('x*sin(10*pi*x)+2',[-1,2]);
%% 参数设置
fishnum=50; %生成50只人工鱼
MAXGEN=50; %最多迭代次数
try_number=100;%最多试探次数
visual=1; %感知...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· % spiral_dyn.m
% returns x,y position along an archimedean spiral of degree n
% based on cputime, first time it is called is start time
%
% based on: r = a*(theta^n)
%
% usage: [x_cnt,y_cnt] = s...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：
· %% 动态粒子群算法
%% 清空环境
clear
clc
%% 设置双峰参数
% 设置con1参数
X1 = 25;
Y1 = 25;
H1 =410;
%设置con2参数
H2=zeros(1,1200);
i=1:200;
H2(i)=450-fix(i/5);
i=201:700;
H2(i)=410;
i=70...
运行环境：Win9X/2000/XP/2003/
授权方式：破解版
推荐星级：