开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数值算法/人工智能 > 查看源码
AprioriView.cpp
资源名称：Apriori.zip　[点击查看]
上传用户：zscyanite
上传日期：2022-07-25
资源大小：4947k
文件大小：12k
源码类别：

数值算法/人工智能

开发平台：

Visual C++

AprioriView.cpp：源码内容
  1. // AprioriView.cpp : implementation of the CAprioriView class
  2. //
  4. #include "stdafx.h"
  5. #include "Apriori.h"
  7. #include "AprioriSet.h"
  8. #include "AprioriDoc.h"
  9. #include "AprioriView.h"
  11. #include "GetData.h"
  12. #include "time.h"
  14. #ifdef _DEBUG
  15. #define new DEBUG_NEW
  16. #undef THIS_FILE
  17. static char THIS_FILE[] = __FILE__;
  18. #endif
  20. /////////////////////////////////////////////////////////////////////////////
  21. // CAprioriView
  23. IMPLEMENT_DYNCREATE(CAprioriView, CRecordView)
  25. BEGIN_MESSAGE_MAP(CAprioriView, CRecordView)
  26. //{{AFX_MSG_MAP(CAprioriView)
  27. ON_BN_CLICKED(IDC_FREQBN, OnFreqBn)
  28. ON_COMMAND(ID_GETDATA, OnGetData)
  29. ON_BN_CLICKED(IDC_RULEBN, OnRuleBn)
  30. //}}AFX_MSG_MAP
  31. // Standard printing commands
  32. ON_COMMAND(ID_FILE_PRINT, CRecordView::OnFilePrint)
  33. ON_COMMAND(ID_FILE_PRINT_DIRECT, CRecordView::OnFilePrint)
  34. ON_COMMAND(ID_FILE_PRINT_PREVIEW, CRecordView::OnFilePrintPreview)
  35. END_MESSAGE_MAP()
  37. /////////////////////////////////////////////////////////////////////////////
  38. // CAprioriView construction/destruction
  40. CAprioriView::CAprioriView()
  41. : CRecordView(CAprioriView::IDD)
  42. {
  43. //{{AFX_DATA_INIT(CAprioriView)
  44. // NOTE: the ClassWizard will add member initialization here
  45. m_pSet = NULL;
  46. //}}AFX_DATA_INIT
  47. // TODO: add construction code here
  49. }
  51. CAprioriView::~CAprioriView()
  52. {
  53. }
  55. void CAprioriView::DoDataExchange(CDataExchange* pDX)
  56. {
  57. CRecordView::DoDataExchange(pDX);
  58. //{{AFX_DATA_MAP(CAprioriView)
  59. DDX_Control(pDX, IDC_RULELIST, m_rlist);
  60. DDX_Control(pDX, IDC_LIST1, m_list);
  61. //}}AFX_DATA_MAP
  62. }
  64. BOOL CAprioriView::PreCreateWindow(CREATESTRUCT& cs)
  65. {
  66. // TODO: Modify the Window class or styles here by modifying
  67. //  the CREATESTRUCT cs
  69. return CRecordView::PreCreateWindow(cs);
  70. }
  72. void CAprioriView::OnInitialUpdate()
  73. {
  74. m_pSet = &GetDocument()->m_aprioriSet;
  75. CRecordView::OnInitialUpdate();
  76. GetParentFrame()->RecalcLayout();
  77. ResizeParentToFit();
  79. }
  81. /////////////////////////////////////////////////////////////////////////////
  82. // CAprioriView printing
  84. BOOL CAprioriView::OnPreparePrinting(CPrintInfo* pInfo)
  85. {
  86. // default preparation
  87. return DoPreparePrinting(pInfo);
  88. }
  90. void CAprioriView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
  91. {
  92. // TODO: add extra initialization before printing
  93. }
  95. void CAprioriView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
  96. {
  97. // TODO: add cleanup after printing
  98. }
  100. /////////////////////////////////////////////////////////////////////////////
  101. // CAprioriView diagnostics
  103. #ifdef _DEBUG
  104. void CAprioriView::AssertValid() const
  105. {
  106. CRecordView::AssertValid();
  107. }
  109. void CAprioriView::Dump(CDumpContext& dc) const
  110. {
  111. CRecordView::Dump(dc);
  112. }
  114. CAprioriDoc* CAprioriView::GetDocument() // non-debug version is inline
  115. {
  116. ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CAprioriDoc)));
  117. return (CAprioriDoc*)m_pDocument;
  118. }
  119. #endif //_DEBUG
  121. /////////////////////////////////////////////////////////////////////////////
  122. // CAprioriView database support
  123. CRecordset* CAprioriView::OnGetRecordset()
  124. {
  125. return m_pSet;
  126. }
  129. /////////////////////////////////////////////////////////////////////////////
  130. // CAprioriView message handlers
  132. void CAprioriView::OnFreqBn() 
  133. {
  134. // TODO: Add your control notification handler code here
  135. CString strValue[MaxSize];
  136. clock_t start,stop;
  137. double timeused;
  138. int flag=0;
  139. if (ItemCount<=0)
  140. {
  141. MessageBox("请先进行参数设置",NULL,MB_OK);
  142.     return;
  143. }
  144.     start=clock();
  145. FindLargeItem();
  146. for(int k=1;LargeItemCount[k-1]!=0;k++)
  147. {    
  148.      
  149.      AprioriGen(k);
  150. for(int mm=0;mm<CandLargeItemCount[k];mm++)
  151. {
  152. nCountCand[mm]=0;
  153. }
  154.         
  155. //统计计数
  156. for(int j=0;j<CandLargeItemCount[k];j++)
  157. {
  158. for(int j1=0;j1<nDbItemCount;j1++)
  159. {   
  160. for(int j2=0;j2<DbItemCount[j1];j2++)
  161. {
  162. if(CandLargeItem[k][j].Find(DbItem[j1][j2])!=-1) 
  163. {  flag++; }
  164. }
  165. if(flag==k+1)
  166. {
  167.      nCountCand[j]++;
  168.      flag=0;
  169. }
  170. flag=0;
  171. }
  174. }
  175.      ShowFreqItem(k);
  176.  
  177. }
  178. ncount=k-1;
  179. //CString msg1;
  180. //msg1.Format("%d",ncount);
  181. //AfxMessageBox(msg1);
  182. m_list.InsertString(0,"频繁项目集：n");
  183. stop=clock();
  184. timeused=(double)(stop-start)/CLK_TCK;
  185. CString msg;
  186. msg.Format("运行程序所用时间为：%5.7f秒",timeused);
  187. AfxMessageBox(msg);
  188. }
  194. void CAprioriView::FindLargeItem()
  195. {
  196. int nFieldCount=m_pSet->GetODBCFieldCount();
  197. int nCount=0;
  198. int nFreqItem[100];
  200.     int nDbCount=0;
  201. CString str;
  202. CString strValue;
  203. CString strIntToString;
  204.   // 初始化候选项目集
  206.     for(int i=0;i<ItemCount;i++)
  207. {   
  208. str="";
  209. str.Format("%s%d",str,i+1); 
  210. CandLargeItem[0][i]='I'+str;
  211. }
  212. //初始化数组
  213. for(int ii=0;ii<ItemCount;ii++)
  214. nFreqItem[ii]=0;
  216. m_pSet->MoveFirst ();
  217. while(!m_pSet->IsEOF())
  218. {
  219. for(int j=1;j<nFieldCount;j++){
  220. m_pSet->GetFieldValue(j,strValue);
  221.            SubItemGen(nDbCount++ ,strValue);
  222. for(int i=0;i<ItemCount;i++)
  223. if(strValue.Find(CandLargeItem[0][i])!=-1)
  224. nFreqItem[i]++;
  227. }
  228. m_pSet->MoveNext();
  229. }
  231. nDbItemCount=nDbCount;
  232.     for(int i1=0;i1<ItemCount;i1++)
  233. { 
  234.    if(double(nFreqItem[i1])/double(nDbItemCount)>=ItemSupp)
  235. {  
  236.    CString str; 
  237.    LargeItem[0][nCount]=CandLargeItem[0][i1];
  238.    str.Format("%s%20d",LargeItem[0][nCount],nFreqItem[i1]);
  239.    m_list.InsertString(nCount,str);
  240.    NLargeItemCount[0][nCount]=nFreqItem[i1];
  241.    nCount++;
  242. }
  244. }
  245. LargeItemCount[0]=nCount;
  246. }
  256. void CAprioriView::OnGetData() 
  257. {
  258. // TODO: Add your command handler code here
  259. CGetData dlg;
  260. dlg.m_itemcount=10;
  261. dlg.m_itemsupp=0.2;
  262. dlg.m_itemconf=0.7;
  263. int ren=dlg.DoModal();
  264. ItemCount=dlg.m_itemcount;
  265. ItemSupp=dlg.m_itemsupp;
  266. ItemConf=dlg.m_itemconf;
  267. }
  271. void CAprioriView::SubItemGen(int strSubItemCount/*表示第几个事物*/,CString strSubItem
  272.   /*表示第几个事物的具体内容如：I1，I2*/)
  273. {//对每个事务分解成单个项目，并存储到数组 DbItem[][]中去
  274. CString strTemp;
  276. int nSubItemCount;
  277. int nstrTemp;
  279. strTemp=strSubItem;
  280. nSubItemCount=0;//用于统计所有的单个项目的个数
  281. while((nstrTemp=strTemp.Find(','))!=-1)
  282. {
  283. DbItem[strSubItemCount][nSubItemCount++]=strTemp.Left(nstrTemp);
  284. strTemp=strTemp.Mid(nstrTemp+1);
  285. }
  286.     DbItem[strSubItemCount][nSubItemCount++]=strTemp;
  287. DbItemCount[strSubItemCount]=nSubItemCount;
  289.     
  290. }
  293. bool CAprioriView::Prune( int level, CString strCandFreqItem)
  294. {
  295. CString strTemp,str;
  296. int flag=0,nstrTemp;
  297. int nSubItemCount=0,nFreqCount=0;//存放单个项目的个数
  298.     strTemp=strCandFreqItem;
  299. CString strSubTemp[MaxSize];//存放分解出来的单个项目
  300. CString strFreqItem[MaxSize];//存放k阶的子集
  301.     while((nstrTemp=strTemp.Find(','))!=-1)
  302. {
  303. strSubTemp[nSubItemCount++]=strTemp.Left(nstrTemp);
  304. strTemp=strTemp.Mid(nstrTemp+1);
  305. }
  306.     strSubTemp[nSubItemCount++]=strTemp;
  307.     for(int i=0;i<nSubItemCount;i++)
  308. {   str="";
  309.     if(nSubItemCount<=2)
  310. {
  311. strFreqItem[nFreqCount++]=strSubTemp[i];
  312. }
  313. else{
  314. for(int j=i+1;j<nSubItemCount;j++)
  315. {   str=strSubTemp[i]+",";
  316.      if(level>1){
  317.      for(int k=j;k<j+level-1&&k<nSubItemCount;k++)
  318.     str=str+strSubTemp[k]+",";}
  319.      for(int m=j+level-1;m<nSubItemCount;m++)
  320. {
  321.      str=str+strSubTemp[m]+",";
  322. }
  323.      strFreqItem[nFreqCount++]=str.Left(str.GetLength()-1);
  324. }
  325. }
  326. } 
  327.     
  329.     for(int j=0;j<nFreqCount;j++)
  330. {
  332. for( int i = 0; i < LargeItemCount[level-1]; i++ )
  333. if (LargeItem[level-1][i].Find(strFreqItem[nFreqCount])!=-1 ) 
  334. flag++;
  335. }
  337. if(flag>0)return true;
  338. else return false;
  339. }
  342. void CAprioriView::AprioriGen( int level )
  343. {
  344. CString strTemp,strTemp1,strTemp2,strTemp11,strTemp22;
  345. int levelCount = 0;
  346. int n;
  348. // 如果两个L(k-1)项，前k-2都相同，只是最后一项不同，且前一项小于后一项
  349. // 则生成C(k)，并剪枝
  350. if(level==1)
  351. {
  352. for(int i = 0; i < LargeItemCount[level-1]; i++)
  353. {
  354.        strTemp1 = LargeItem[ level-1 ][i];
  355. for(int j = i + 1; j < LargeItemCount[level-1]; j++)
  356. {
  357.  strTemp2 = LargeItem[ level-1 ][j];
  358. if ( strTemp1 < strTemp2)
  359. {
  360. strTemp = strTemp1 + "," + strTemp2;
  361. for(n=0;n<j;n++)
  362. if(strTemp==CandLargeItem[level][n]) continue;
  363.                 if(Prune(level,strTemp))
  364. CandLargeItem[level][levelCount++] = strTemp;
  365. }
  366. }
  367. }
  368. }
  369. else{
  370. for(int i = 0; i < LargeItemCount[level-1]; i++)
  371. {
  372. strTemp1 = LargeItem[ level-1 ][i];
  373. strTemp11=strTemp1.Left(strTemp1.GetLength()-3);
  374. for(int j = i + 1; j < LargeItemCount[level-1]; j++)
  375. {
  376.  strTemp2 = LargeItem[ level-1 ][j];
  377.              strTemp22=strTemp2.Left(strTemp2.GetLength()-3);
  378. if ( strTemp11 == strTemp22 &&strTemp1.Mid(strTemp1.GetLength()-2)
  379. < strTemp2.Mid(strTemp2.GetLength()-2))
  380. {
  381. strTemp = strTemp1 + "," + strTemp2.Mid(strTemp2.GetLength()-2);
  382. for(n=0;n<j;n++)
  383. if(strTemp==CandLargeItem[level][n]) continue;
  384.                 if(Prune(level,strTemp))
  385. CandLargeItem[level][levelCount++] = strTemp;
  386. }
  387. }
  389. }
  390. }
  391. CandLargeItemCount[level]=levelCount++;
  392. }
  395. void CAprioriView::ShowFreqItem(int nScanCount)
  396. {
  397. CString strIntToString="";
  398.     CString strValue;
  399. CString strjj3[2];
  400. CString str;
  401. int nLargeCount=-1;
  402. int nLargeItemCount=0;
  403. //以下为求频繁项目集
  404. int k;
  405. k=nScanCount;  
  406. m_list.InsertString(0,"-----------------------");
  407. for(int jj2=0;jj2<CandLargeItemCount[k];jj2++)
  408. {
  409. if(double(nCountCand[jj2])/double(nDbItemCount)>=ItemSupp)
  410. {
  411. LargeItem[k][nLargeItemCount++]=CandLargeItem[k][jj2];
  412. nLargeCount++;
  413. //nLargeItemCount[0][0]=4;
  414. NLargeItemCount[k][nLargeItemCount-1]=nCountCand[jj2];
  416. str.Format("%s%20d",LargeItem[k][nLargeItemCount-1],nCountCand[jj2]);
  417.     m_list.InsertString(nLargeCount,str);
  418. }
  419. }
  421.         //复制频繁项目个数
  422.   LargeItemCount[k]=nLargeItemCount;
  423. }
  427. void CAprioriView::OnRuleBn()
  428. { 
  429. // TODO: Add your control notification handler code here
  430. CString strSubTemp[MaxSize][MaxSize],strTemp,Rule[MaxSize][MaxSize]/*用于存放规则的左边部分*/;
  431. CString str,msg;
  432. int nstrTemp,nSubCount=0,count=-1,rcount=0,rrcount;
  433. clock_t start,stop;
  434. double timeused;
  435. start=clock();
  436. for(int i=0;i<LargeItemCount[ncount-1];i++)
  437. {     strTemp=LargeItem[ncount-1][i];  
  438.      while((nstrTemp=strTemp.Find(','))!=-1)
  439.  {
  440.      strSubTemp[i][nSubCount++]=strTemp.Left(nstrTemp);
  441.      strTemp=strTemp.Mid(nstrTemp+1);
  442. //AfxMessageBox(strSubTemp[i][nSubCount-1]);
  443.  }
  444.          strSubTemp[i][nSubCount++]=strTemp;
  445. // AfxMessageBox(strSubTemp[i][nSubCount-1]);
  446.  nSubCount=0;
  447.    }
  448. strTemp="";
  449. for(int n=0;n<LargeItemCount[ncount-1];n++)
  450. {
  451.      for(int k=1;k<ncount;k++)
  452.  {
  453. for(int ii=0;ii<ncount;ii++)
  454. {
  455. if(k==1){Rule[n][rcount++]=strSubTemp[n][ii];}
  456. else 
  457. {
  458. strTemp=strSubTemp[n][ii];
  459. if(k>2){
  460.              for(int kk=ii+1;kk<ii+k-1&&kk<ncount;kk++)
  461. {strTemp=strTemp+","+strSubTemp[n][kk]+",";
  462. //AfxMessageBox(strSubTemp[n][kk]);
  463. }
  464.                       for(int jj=kk;jj<ncount;jj++)
  465.   Rule[n][rcount++]=strTemp+","+strSubTemp[n][jj];
  466.  }
  467. else{
  468.     for(int jj=ii+1;jj<ncount;jj++)
  469. Rule[n][rcount++]=strTemp+","+strSubTemp[n][jj];}
  470. }
  471. }
  472. }
  473. rrcount=rcount;
  474. rcount=0;
  475. }
  476. for(int i1=0;i1<LargeItemCount[ncount-1];i1++)
  477. {
  478. for(int j1=0;j1<rrcount;j1++)
  479. {
  480.           for(int i2=0;i2<ncount;i2++)
  481.   for(int j2=0;j2<LargeItemCount[i2];j2++)
  482.   if(Rule[i1][j1]==LargeItem[i2][j2])
  483.   {    
  484.   if(double(NLargeItemCount[ncount-1][i1])/double(NLargeItemCount[i2][j2])>ItemConf)
  485.   {   str="";
  486.   for(int i3=0;i3<ncount;i3++)
  487.   { 
  488.    if(Rule[i1][j1].Find(strSubTemp[i1][i3])==-1)
  489.    {
  490.  str=str+strSubTemp[i1][i3]+",";
  491.    }
  492.   }
  493.   count++;
  494.   msg.Format("%s→%s",Rule[i1][j1],str.Left(str.GetLength()-1));
  495.                    m_rlist.InsertString(count,msg);
  496.   }
  497.   }
  498. }
  499. }
  500. stop=clock();
  501. timeused=(double)(stop-start)/CLK_TCK;
  502. msg.Format("生成关联规则所用时间为：%5.7f秒",timeused);
  503. AfxMessageBox(msg);
  504. }