fcm源代码.doc

  1. 1、本文档共3页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
fcm源代码

function [center, U, obj_fcn] = FCMClust(data, cluster_n, options) % FCMClust.m? ?采用模糊C均值对数据集data聚为cluster_n类?? % % 用法: %? ?1.??[center,U,obj_fcn] = FCMClust(Data,N_cluster,options); %? ?2.??[center,U,obj_fcn] = FCMClust(Data,N_cluster); %? ? % 输入: %? ?data? ?? ???---- nxm矩阵,表示n个样本,每个样本具有m的维特征值 %? ?N_cluster? ?---- 标量,表示聚合中心数目,即类别数 %? ?options? ???---- 4x1矩阵,其中 %? ?? ? options(1):??隶属度矩阵U的指数,1? ?? ?? ?? ?? ?? ?(缺省值: 2.0) %? ?? ? options(2):??最大迭代次数? ?? ?? ?? ?? ?? ?? ?? ?? ?(缺省值: 100) %? ?? ? options(3):??隶属度最小变化量,迭代终止条件? ?? ?? ???(缺省值: 1e-5) %? ?? ? options(4):??每次迭代是否输出信息标志? ?? ?? ?? ?? ? (缺省值: 1) % 输出: %? ?center? ?? ?---- 聚类中心 %? ?U? ?? ?? ???---- 隶属度矩阵 %? ?obj_fcn? ???---- 目标函数值 %? ?Example: %? ?? ? data = rand(100,2); %? ?? ? [center,U,obj_fcn] = FCMClust(data,2); %? ?? ? plot(data(:,1), data(:,2),o); %? ?? ? hold on; %? ?? ? maxU = max(U); %? ?? ? index1 = find(U(1,:) == maxU); %? ?? ? index2 = find(U(2,:) == maxU); %? ?? ? line(data(index1,1),data(index1,2),marker,*,color,g); %? ?? ? line(data(index2,1),data(index2,2),marker,*,color,r); %? ?? ? plot([center([1 2],1)],[center([1 2],2)],*,color,k) %? ?? ? hold off; if nargin ~= 2 nargin ~= 3,? ? %判断输入参数个数只能是2个或3个 ? ? ? ? error(Too many or too few input arguments!); end data_n = size(data, 1); % 求出data的第一维(rows)数,即样本个数 in_n = size(data, 2);? ?% 求出data的第二维(columns)数,即特征值长度 % 默认操作参数 default_options = [2;? ? ? ? % 隶属度矩阵U的指数 ? ? 100;? ?? ?? ?? ?? ? % 最大迭代次数?? ? ? 1e-5;? ?? ?? ?? ?? ?% 隶属度最小变化量,迭代终止条件 ? ? 1];? ?? ?? ?? ?? ???% 每次迭代是否输出信息标志?? if nargin == 2, ? ? ? ? options = default_options; else? ?? ? %分析有options做参数时候的情况 ? ? ? ? % 如果输入参数个数是二那么就调用默认的option; ? ? ? ? if length(options) 4, %如果用户给的opition数少于4个那么其他用默认值; ? ? ? ? ? ? ? ? tmp = default_options; ? ? ? ? ? ? ? ? tmp(1:length(options)) = options; ? ? ? ? ? ? ? ? options = tmp; ? ? end ? ? % 返回options中是数的值为0(如NaN),不是数时为1 ? ? ? ? nan_index = find(isnan(options)==1); ? ? %将denfault_options中对应位置的参数赋值给options中不

文档评论(0)

xcs88858 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:8130065136000003

1亿VIP精品文档

相关文档