当前位置:MATLAB代做|MATLAB代写|MATLAB有偿编程 → matlab源码 → 图像分析
源码名称
源码大小
更新时间
人 气
·
figure('name','嫦娥一号与月亮、地球关系');%设置标题名字
s1=[0:.01:2*pi];
hold on;axis equal;%建立坐标系
axis off % 除掉Axes
r1=10;%月亮到地球的平均距离
r2=3;%嫦娥一号到月亮的平均距离
w1=1;%设置...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· %利用大津法(Ostu)计算阈值
%{
大津法由大津于1979年提出,对图像Image,记t为前景与背景的分割阈值,前景点数占图像
比例为w0,平均灰度为u0;背景点数占图像比例为w1,平均灰度为u1。
图像的总平均灰度为:...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· %利用大津法(Ostu)计算阈值
%{
大津法由大津于1979年提出,对图像Image,记t为前景与背景的分割阈值,前景点数占图像
比例为w0,平均灰度为u0;背景点数占图像比例为w1,平均灰度为u1。
图像的总平均灰度为:...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function varargout=Yxian(varargin)
%x0=1;y0=1;
N=1000;
n=6;
figure();
axis([-4 4 -4 4]);
for i=1:n
[x0,y0]=ginput(1);
ff(x0,y0,N);
end
function ff(x0,y0,N)
x=ones(1,N);
y=x;
dx=y;
ar=y;...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· xmax=1;
ymax=1
figure('name','休想逃!');
fill([-2.5,2,2,-2.5],[-2,-2,-1.2,-1.2],'g');
hold on;
fill([-xmax-0.3,-xmax+0.3,-xmax+0.3,-xmax-0.3],[-2*ymax+0.1,-2*ymax+0.1,-2*ymax+0.4,-2*ymax+0.4],[0...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· hf=figure('name','汉诺塔游戏仿真'); %加标题
axis([0,12,0,12]); %画坐标
set(hf,'color','w'); %填充背景
hold on; %保持图形
axis('off'); %隐藏网络线
rectangle('position',[0,0,12,0.5],'FaceColor',[0,...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· 【项目4464】matlab编程史密斯圆图演示源码程序,该程序通俗易懂,适应力较强,可运行出结果,程序清晰,算法明确,包括程序说明文件 程序源码 测试数据等文件。
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear all
clc
PS=imread('1.jpg');
subplot(1,2,1);
imshow(PS)
title('原图')
p=rgb2gray(PS);
subplot(1,2,2)
imshow(p)
title('原灰度图')
[m,n]=size(p);
GP=zeros(1,256);
for k=0:255
...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear; clc
[a ,map]= imread('test.JPG');
I=im2bw(a,0.75);
I=1-I;
Ileast = bwlabel(I,4); % 标定图像的连通域
nummax = max(Ileast(:)); % 分块数
col=length(I(:,1)); % 行数
row=length(I(1,:)); % 列数...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear;clc;
[x,y]=meshgrid(-8:.1:8);
for j=1:10
f=@(x,y)(sin(sqrt((11-j)*(x.^2+y.^2)))./sqrt((11-j)*(x.^2+y.^2)+eps));
z=f(x,y);
surf(x,y,z);
shading interp;
M(j) = getframe;
if j==1
[...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· 下面这个函数主要是求感兴趣区域的物理特征:周长、面积、宽、高等。还是用的比较多的,贴出来分享下。
传入的图像必须是二值的哦
function [L,A,H,W]=canshu(I)
% 注意必须保证二值图像中,细胞区域为白色...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clc
clear
close all
bw=imread('3.bmp');
bw=rgb2gray(bw);
bw=im2bw(bw);
bw=bw(2:end-1,2:end-1);
figure;imshow(bw)
% bw=bw==0;
%输入 单个字符分割 二值 化
[rc,sc]=find(bw==1);
x_min=min(rc);x_...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· 算法依据:现实中不同面值的人民币长宽比是特定的,因此可根据人民币的长宽比来进行币值分类。
基本原理:同上。
不多说了,直接上代码:
clc
clear
close all
%代写程序&算法设计 扣扣: 380238062
%...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· mu=0;sigma=10;
p=2;--%广义高斯分布形状参数
A=1/sigma*(gamma(3/p)/gamma(1/p))^0.5;
b=A^(p);
a=1/p;
Z=gamrnd(a,b,100,100);
Y=Z.^(1/p);
N=1000;
B=binornd(N,0.5,100,100);
X=(-1).^B.*Y;
hist(X(:)...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· clear all
%一,图像的预处理,读入彩色图像将其灰度化
PS=imread('a3.jpg'); %读入JPG彩色图像文件
figure(1);subplot(2,2,1);imshow(PS);title('原图像灰度图');
%二,绘制直方图
[m,n]=size(PS); %测量图像尺...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· 图像的灰度直方图(H是图像a.bmp的数据矩阵)
imhist(H);%显示a的直方图
histeq(H); %将图像a进行直方图均衡化
adapthisteq(H); %将图像a进行直方图均衡化
imhist函数只能处理二维数据,因此处理RGB图像,需先转化...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· 意义
在摄像机标定过程中常常需要打印棋盘格程序,还有就是在投影仪标定当中常常需要投射和投影仪相同分辨率的pattern
clear all;
clc;
width=1024 ; %pattern的宽
height=768 ; %pattern的高
img_final=zero...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function [Len, XYn, xy_long] = Hough_Process(bw, Img, flag)
if nargin < 3
flag = 1;
end
[H, T, R] = hough(bw);
P = houghpeaks(H, 4, 'threshold', ceil(0.3*max(H(:))));
lines = houghlines(bw, T, ...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· close all
I = imread('office_5.jpg');
I = rgb2gray(I);
W = imread('logo.tif');
W=W(12:91,17:96);
figure('Name','载体图像')
imshow(I);
title('载体图像')
figure('Name','水印图像')
imshow(W);
t...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function vec=exactvecotr(img)
[m,n,~]=size(img);
vec=zeros(m*n,3);
img=double(img);
for j=1:n
for i=1:m
color=img(i,j,:);
dist=[];
texture=[];
vec((j-1)*m+i,:)=[color(:);dist(:);texture(...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

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

· function varargout = MainFrame(varargin)
% MAINFRAME MATLAB code for MainFrame.fig
% MAINFRAME, by itself, creates a new MAINFRAME or raises the existing
% singleton*.
%
% H = MAINFRAME returns t...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

· function [num, MC] = Reco(S, file)
MC = GetFeather(file);
N = [];
h = waitbar(0, '', 'Name', '音频识别...');
steps = length(MC);
for i = 1 : length(MC)
mc = MC{i};
mindis = [];
for j = 1 :...
运行环境:Win9X/2000/XP/2003/
授权方式:破解版
推荐星级:

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