當前位置：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/
授權方式：破解版
推薦星級：