下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、 数据挖掘实验报告(二)关联规则挖掘:圣杰班级:计算机1304学号:1311610602一、实验目的1. 1.掌握关联规则挖掘的Apriori算法;2. 将Apriori算法用具体的编程语言实现。二、实验设备 PC一台,dev-c+5.11三、实验容根据下列的Apriori算法进行编程:四、实验步骤1.编制程序。2.调试程序。可采用下面的数据库D作为原始数据调试程序,得到的候选1项集、2项集、3项集分别为C1、C2、C3,得到的频繁1项集、2项集、3项集分别为L1、L2、L3。代码5 / 5#include <stdio.h>#include<string.h>#def
2、ine D 4 /事务的个数#define MinSupCount 2 /最小事务支持度数void main() char a45='A','C','D','B','C','E','A','B','C','E','B','E' char b20,d100,t,b210010,b2110010; int i,j,k,x=0,flag=1,c20=0,x1=0,i1=0,j1,counter=0,c1100=
3、0,flag1=1,j2,u=0,c2100=0,n20,v=1;int count100,temp; for(i=0;i<D;i+) for(j=0;aij!='0'j+) /用来判断之前保存的是否和aij一样,不一样就保存,一样就不保存 for(k=0;k<x;k+) if(bk!=aij) ; else flag=0;break; /用来判断是否相等 if(flag=1) bx=aij; x+; else flag=1; /计算筛选出的元素的支持度计数 for(i=0;i<D;i+) for(j=0;aij!='0'j+) for(k=0
4、;k<x;k+) if(aij=bk) ck+;break; /对选出的项集进行筛选,选出支持度计数大于等于2的,并且保存到dx1数组中 for(k=0;k<x;k+) if(ck>=MinSupCount) dx1=bk;countx1=ck; x1+; /对选出的项集中的元素进行排序 for(i=0;i<x1-1;i+) for(j=0;j<x1-i-1;j+) if(dj>dj+1) t=dj;dj=dj+1;dj+1=t;temp=countj;countj=countj+1;countj+1=temp; /打印出L1 printf("L1
5、 elements are:n"); for(i=0;i<x1;i+) printf("%c = %d n",di,counti); /计算每一行的元素个数,并且保存到n数组中 for(i=0;i<D;i+) for(j=0;aij!='0'j+); ni=j; /对a数组的每一行进行排序 for(i=0;i<D;i+) for(j=0;j<ni-1;j+) for(k=0;k<ni-j-1;k+) if(aik>aik+1) t=aik; aik=aik+1; aik+1=t; /把L1中的每一个元素都放在b2
6、i0中 j1=x1; for(i=0;i<j1;i+) b2i0=di; /把L1中的元素进行组合,K=2开始,表示x1个元素选K个元素的组合 for(k=2;b200!='0'k+) /u是用来计数组合总数的 u=0;v=1;/v 是用来在进行输出各种组合的标识数 v=1 说明正在进行输出 for(i=0;i<100;i+) c2i=0; for(i=0;i<j1;i+) for(i1=i+1;i1<j1;i1+) for(j=0;j<k-2;j+) if(b2ij!=b2i1j) flag1=0;break; /进行组合的部分 if(flag1
7、=1&&b2ik-2!=b2i1k-2) for(j2=0;j2<k-1;j2+) b21uj2=b2ij2; b21uk-1=b2i1k-2; u+; flag1=1; counter=0; for(i=0;i<D;i+) /a数组有5行元素 for(i1=0;i1<u;i1+) / 代表x1个元素选K个元素的所有组合总数 for(j1=0;j1<k;j1+) /K 代表一个组合中的元素个数 for(j=0;aij!='0'j+) /逐个比较每一行的元素 if(aij=b21i1j1) counter+; if(counter=k) c2i1+; /把每种组合数记录在c2数组中counter=0; j1=0;temp=0;/这里的temp 是用来分行/对u种情况进行选择,选出支持度计数大于2的*/ for(i=0;i<u;i+) if(c2i>=MinSupCount) if(v=1) printf("L%d elements are:n",k); v=0; printf(""); for(j=0;j<k;j+) /输出每种组合k 个元素 b2j1j=b21ij;
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 人工关节置换术后康复指南
- ICU重症监护药物管理规范
- 2025年六年级数学上册期末全真模拟基础卷(二)(答案)(苏教版)
- 分娩期妇女的科学护理指南
- 2026年德阳农业科技职业学院单招职业适应性考试题库必考题
- 2026年抚顺师范高等专科学校单招职业倾向性测试题库新版
- 2026年大庆医学高等专科学校单招职业适应性考试必刷测试卷及答案1套
- 2026年河北机电职业技术学院单招职业倾向性测试题库新版
- 2026年江西艺术职业学院单招职业技能考试题库新版
- 2026年锡林郭勒职业学院单招职业适应性测试题库必考题
- 保密知识竞赛参考试题库(附答案)
- 学校考核物业表格
- 二年级数学《乘加乘减》集体备课活动记录
- 2024年广东省政工师理论知识考试参考题库(含答案)
- 蜜雪冰城是如何实现成本领先的
- 电子商务公司薪资体系
- 幼儿教资(综合素质)及答案
- 列车电子防滑器-电子防滑器原理
- 电子元器件标示及实物对照
- 耕地合法永久转让协议书
- 芜湖仅一机械有限公司年产500万套汽车零部件及通讯设备压轴件生产线项目(承诺制项目)环境影响报告表
评论
0/150
提交评论