人工智能实验报告讲述.docx

  1. 1、本文档共25页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
《 —人工智能方向实习—》实 习 报 告专业: 计算机科学与技术 班级: 学号: 姓名: 江苏科技大学计算机学院2016年 3 月实验一 数据聚类分析一、实验目的编程实现数据聚类的算法。二、实验内容k-means聚类算法。三、实验原理方法和手段k-means算法接受参数k ;然后将事先输入的n个数据对象划分为k个聚类以便使得所获得的聚类满足:同一聚类中的对象相似度较高.四、实验条件Matlab2014b五、实验步骤初始化k个聚类中心。计算数据集各数据到中心的距离,选取到中心距离最短的为该数据所属类别。计算(2)分类后,k个类别的中心(即求聚类平均距离)继续执行(2)(3)直到k个聚类中心不再变化(或者数据集所属类别不再变化)六、实验代码%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% main.m% k-means algorithm% @author matcloud%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%clear;close all;load fisheriris;X = [meas(:,3) meas(:,4)];figure;plot(X(:,1),X(:,2),ko,MarkerSize,4);title(fisheriris dataset,FontSize,18,Color,red);[idx,ctrs] = kmeans(X,3);figure;subplot(1,2,1);plot(X(idx==1,1),X(idx==1,2),ro,MarkerSize,4);hold on;plot(X(idx==2,1),X(idx==2,2),go,MarkerSize,4);hold on;plot(X(idx==3,1),X(idx==3,2),bo,MarkerSize,4);hold on;plot(ctrs(:,1),ctrs(:,2),kx,MarkerSize,12);title(official kmeans,FontSize,16,Color,red);[idx,ctrs] = my_kmeans(X,3);subplot(1,2,2);plot(X(idx==1,1),X(idx==1,2),ro,MarkerSize,4);hold on;plot(X(idx==2,1),X(idx==2,2),go,MarkerSize,4);hold on;plot(X(idx==3,1),X(idx==3,2),bo,MarkerSize,4);hold on;plot(ctrs(:,1),ctrs(:,2),kx,MarkerSize,12);title(custom kmeans,FontSize,16,Color,red);function [idx,ctrs] = my_kmeans(m,k) [row col] = size(m);%init k centroids p = randperm(size(m,1));for i = 1 : k ctrs(i,:) = m(p(i),:);end idx = zeros(row,1);%idex is pointer of groupwhile 1 d = dist2matrix(m,ctrs); [z,g] = min(d,[],2);if(g == idx)break;else idx = g;end%update ctroidsfor i = 1 : k v = find(g == i);if v ctrs(i,:) = mean(m(v,:),1);endendendendfunction [idx,ctrs] = my_kmeans(m,k) [row col] = size(m);%init k centroids p = randperm(size(m,1));for i = 1 : k ctrs(i,:) = m(p(i),:);end idx = zeros(row,1);%idex is pointer of groupwhile 1 d = dist2matrix(m,ctrs); [z,g] = min(d,[],2);if(g == idx)break;else idx = g;end%update ctroidsfor i = 1 : k v = find(g ==

文档评论(0)

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

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

1亿VIP精品文档

相关文档