基于小波分析的纹理分割

基于小波分析的纹理分割matlab程序。小波 纹理 分割 matlab 程序

/*
 * function D = dist1（xt）;
 * dist1 : calculate a nt*nx vector containing distances between all points
 *	       in x and all points in t. x and t must be row vectors !
 * D = dist1（xt）
 *	xt	- row vectors
 *	D	- the nt*nx result
 *
 * Copyright （c） 1995-2001 Frank Dellaert
 * All rights Reserved
 */

/******************************************************************************
 * dist1_c does not include mex.h !!!
 *****************************************************************************/

void dist1_c（const double *x const double *t double *D int nt int nx）
  {
  int ij;
  for （j=0;j    for （i=0;i      *D = x[j]-t[i];
  }

/******************************************************************************
 * mex part
 *****************************************************************************/

#include “mex.h“

mxArray *dist1（const mxArray *x const mxArray *t）
  {
  mxArray *D;
  int dx=mxGetM（x）nx=mxGetN（x）;
  int dt=mxGetM（t）nt=mxGetN（t）;

  if （dx!=1 || dt!=1） mexErrMsgTxt（“dist1 only takes row vectors“）;
  if （!mxIsDouble（x） || !mxIsDouble（t）） mexErrMsgTxt（“dist1 only takes double vectors“）;
  
  /* create output matrix and call pure C */
  D = mxCreateDoubleMatrix（ntnxmxREAL）;  
  dist1_c（mxGetPr（x） mxGetPr（t） mxGetPr（D） nt nx）;
  return D;
  }

void mexFunction（int nargout mxArray *out[] int nargin const mxArray	*in[]）
  {
  if （nargin!=2 || nargout>1） mexErrMsgTxt（“usage: D = dist1（xt）“）;
  out[0] = dist1（in[0] in[1]）;
  }

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1508  2009-05-08 21:10  dist1.c

     文件        664  2009-05-08 21:11  dist1.m

     文件       6144  2009-04-22 10:34  dist1.mexw32

     文件        159  2009-05-08 21:11  extend.m

     文件        905  2009-05-07 19:16  imagewinmean.m

     文件        272  2009-05-07 21:28  imagewinmeanvector.m

     文件       2579  2009-05-08 21:09  kmeans.m

     文件        820  2009-05-07 19:37  laws.m

     文件       2451  2009-05-08 21:10  sqrDist.c

     文件        608  2009-05-08 21:09  sqrDist.m

     文件       6656  2009-04-22 10:34  sqrDist.mexw32

     文件       2698  2009-04-22 10:29  symex.m

     文件      38101  2009-04-22 10:59  test5.jpg

     文件        627  2009-05-07 19:14  unedgeeff.m

     文件       1400  2009-05-07 21:34  waveletseg.m

     文件        162  2009-05-07 21:27  wreshape.m

----------- ---------  ---------- -----  ----

                65754                    16