当前位置:MATLAB代做|MATLAB代写|MATLAB有偿编程 → matlab源码 → 参考源码 → matlab方面
源码名称
源码大小
更新时间
人 气
·
%%%%%%%%%%%以下是QPSO算法Matlab主程序%%%%%%%%%
%%%%%%%%%%%%%%%%%%%格式初始化%%%%%%%%%%%%
clear all; %清除所有变量
clc; %清屏
format long; %将数据显示为长整形科学计数
%%%%%%%%提取图像参数%%%...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clc
clear
%% 粒子初始化
%粒子群算法中的两个参数
c1=1.49445;
c2=1.49445;
%最大最小权值
wmax=0.9;
wmin=0.1;
%最大最小速度
Vmax=0.03;
Vmin=-0.03;
%最大最小个体
popmax=0.3;
popmin=-0.3;
max...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear all
clc
%PCA-SOM协同过滤推荐系统
load 'predata3.mat'
X=t4;
X=(X-min(min(X)))/(max(max(X))-min(min(X)));
c=[repmat([1 0 1],100,1);repmat([0 0 1],100,1);repmat([1 1 0],100,1);repmat([0 1 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/
授权方式:破解版
推荐星级:

· B=[];
A=importdata('row3.csv'); %导入数据
A=A+10;
i=1;
while i<=length(A)
if A(i)>=40
A(i)=[];
else
i=i+1;
end
end
x=1:5548;
B=A-5;
X=[]; %初始化
J=[];
C=1.3;
X(1)=0;
i=1;
...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear
g_R=0; %r清晰度描述
g_G=0; %g清晰度描述
g_B=0; %b清晰度描述
h_R=0; %熵的描述
h_G=0;
h_B=0;
u1=zeros(3,1);
u2=zeros(3,1);
v11=zeros(3,1); %高分辨率RGB值
v12=zeros(3,1)...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function type=Classifier( PValue )
global node child_value child_node_num
[node,child_value,child_node_num]=ID3();
n=1; %从树的根结点(即node{1})开始查找
k=1;
while ~isempty(child_node_num{...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function finchart()
%FINCHART Financial Expo financial charts.
Fig = figure('Numbertitle','off','Name','MATLAB Financial Charts');
set(gcf,'pointer','watch')
figpos = get(gcf,'position');
Top = f...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function [result]=M_GetU(im,p,q)
%% 中心距
% im:double型图像;
% p:x的阶数;
% q:y的阶数;
% 本程序中横向从左至右为x,纵向从上到下为y
% 子函数
%% 初始化
[height,width]=size(im);
[x,y]=mesh...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clc; clear all; close all;
warning off all;
I = imread('images\\1.jpg');
I1 = Image_Normalize(I, 0);
hsize = [3 3];
sigma = 0.5;
I2 = Image_Smooth(I1, hsize, sigma, 0);
I3 = Gray_Convert(I2, 0)...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function varargout=harris(I,k,q,h)
narginchk(0,4);
nargoutchk(0,2);
if nargin<1
I=checkerboard(50,2,2);
end
if nargin<2
k=0.04;
end
if nargin<3
q=0.01;
end
if nargin<3
h=fspecial('gau...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function varargout = smith(varargin)
%SMITH M-file for smith.fig
% SMITH, by itself, creates a new SMITH or raises the existing
% singleton*.
%
% H = SMITH returns the handle to a new SMITH or th...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function varargout = untitled(varargin)
gui_Singleton = 1;
gui_State = struct('gui_Name', mfilename, ...
'gui_Singleton', gui_Singleton, ...
'gui_OpeningFcn', @untitled_OpeningFcn, ...
'...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· %% 清空环境变量
clc;
clear all
close all
nntwarn off;
%% 载入数据
load data;
% 载入数据并将数据分成训练和预测两类
p_train=p(1:12,:);
t_train=t(1:12,:);
p_test=p(13,:);
t_test=t(13,:);
%% 交...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear all
close all
clc
shuju = xlsread('24时刻电价数据.xls');% 加载数据
shuju = shuju';
shuju1 = shuju(2:4,:);
[m,n] = size(shuju1);
for ii = 1:n
data = shuju1(:,ii)';
syms a u;
c = [a u...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· %绘制一个Gabor滤波器的空域和频域函数图
clear;
x = 0;
theta = 0;
f0 = 0.2;
for i = linspace(-15,15,50)
x = x + 1;
y = 0;
for j = linspace(-15,15,50)
y = y + 1;
z(y,x)=compute(i,j,f0,thet...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· %% 清空环境变量
clc;
clear all
close all
nntwarn off;
%% 数据载入
load data;
a=data;
%% 选取训练数据和测试数据
for i=1:6
p(i,:)=[a(i,:),a(i+1,:),a(i+2,:)];
end
% 训练数据输入
p_train=p(1...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· f=imread('lena.BMP');%读入原始图片
f0=rgb2gray(f);%把彩色图片转化成灰度图片,256级
subplot(2,2,1);
imshow(f);title('原图');
subplot(2,2,2);
imshow(f0);title('灰度图');%显示灰度图片
f=imnoise(f0,...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· % [image, descriptors, locs] = sift(imageFile)
%
% This function reads an image and returns its SIFT keypoints.
% Input parameters:
% imageFile: the file name for the image.
%
% Returned:
% ima...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear all;
clc;
[w,fs,bits]=wavread('XT.wav');%读取声音数据,fs表示采样频率(Hz),bits表示采样位数。
figure;
%subplot(1,3,1);
plot(w);
title('原始语音');
axis([1 length(w) -1 1]);
grid;
%用spe...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:
