【正文】 )。 以下的T等變量都為表41中的數(shù)據(jù)，程序見附錄中程序3。 求正域源程序函數(shù)[y，b]=pospq(p，q)求取決策表為x時，Q的P正域，y是的值，b是Q的P正域集合。例如取a=[1:4],b=[5],有：。程序見附錄中程序4。 求核源程序函數(shù)function y=core(c，d，x)求取決策表為x的條件屬性為c決策屬性為d的核屬性。例如c,d,x同上例，結果為：。函數(shù)pos(p,q),redu(c,d,x)和core(c,d,x)的具體算法見文獻[7]，程序見附錄中程序5。 屬性約簡源程序函數(shù)y=redu(c，d，x)求取決策表為x的條件屬性為c決策屬性為d的屬性簡化。例如對于表41所示系統(tǒng)，取a=[1:4],b=[5],有：程序見附錄中程序6。我們借助MATLAB作出快速的決策。通過運行程序，也良好的驗證了第3章決策系統(tǒng)的正確性與有效性。第5章 結束語本課題結合粗糙集理論的基本思想和方法，將粗糙集理論應用到商場銷售過程中，設計并實現(xiàn)一個針對零售業(yè)商品的決策分析系統(tǒng)，主要完成了以下幾方面的工作： (1) 對影響商場銷售的因素進行了定量分析，通過數(shù)據(jù)約簡，重要性分析，從中獲取有用信息，確定了各個因素對銷售狀況的影響權重。(2) 找出了提高商場銷售量的方法所在，為今后的商場定位、選址、管理等提供了理論依據(jù)，也是粗糙集在零售業(yè)內的一次成功應用。(3) 對基于粗糙集的知識系統(tǒng)進行MATLAB編程，并成功運行，驗證了決策系統(tǒng)的有效性與準確性。本算法適用于一致性決策表和不一致性決策表，在不求核值表的情況下，從約簡后的決策表中通過隸屬度函數(shù)，直接得到各規(guī)則的最少條件屬性集，獲得決策表的所有決策規(guī)則。另外，在該算法得到的所有規(guī)則中，只要將對應同一分類結果的冗余規(guī)則去掉，可以提取出各個屬性約簡下的決策規(guī)則。不足之處在于由于本算法的迭代次數(shù)較多，使得時間復雜性比普通的規(guī)則提取算法要高。粗糙集理論作為一種新的分析和處理不精確、不一致、不完整信息和知識的數(shù)學工具，為智能信息處理提供了有效的處理技術。粗糙集理論其主要思想是在保持分類能力不變的前提下，通過知識簡約，導出分類規(guī)則，這樣也克服了傳統(tǒng)的知識獲取過程中人為因素的影響。致 謝在我這四年求學過程結點的時候，我對自身學識淺薄的惶恐遠比如釋重負的感覺來的更為沉重。但在惶恐之余，我依然要向給予我熱情幫助、關心和鼓勵的老師、同學和朋友，衷心地表示感謝。首先感謝四川理工學院自動化與電子信息學院的各位老師們，在四年的學習過程中，他們給了我豐富的教誨，并為此付出了辛勤的勞動。老師們淵博的學識、寬廣的胸襟和嚴謹?shù)闹螌W態(tài)度將使我終身受益。同時要感謝通信081班的各位同學們，同學之間的情誼、互相幫助的熱情、溝通中思想的迸發(fā)與交流、求學中的快樂與艱辛將給我未來人生之路許多啟發(fā)。尤其要感謝的是我的導師萬懿老師，在我論文寫作階段，從論文框架的確立到修改定稿，給予了我悉心指導和幫助。尤其要說的是萬懿老師平易近人的態(tài)度、嚴謹治學的精神、淵博的學識以及對個人職業(yè)生涯的諄諄教導使我終身受益。最后，謹借此文向所有給予過我?guī)椭c關愛的人們再次深致謝意，而我也將在今后的工作與生活中，以感恩的心來回報他們對我的良好期望。參考文獻[1] 鄧亞萍. 中國零售業(yè)的現(xiàn)狀及發(fā)展趨勢[M]. 北京：合作經(jīng)濟與科技出版社, 2005[2] 姚瓊. 也談中國零售業(yè)的發(fā)展趨[J]. 商業(yè)時代, 2005(18): 1315[3] 吳曉. 大力轉變發(fā)展方式 推動零售業(yè)健康發(fā)展[J]. 中國商貿(mào), 2011(19): 3335[4] Quinlan. Induction of Decision Trees[J]. Machine Learning, 1996(1): 81106[5] 王軼彤, 許學標. Rough集理論在數(shù)據(jù)挖掘中的應用及其推廣[J]. 計算機工程, 1997(18): 69—73[6] 劉清. Rough集及Rough推理[M]. 北京: 科學出版社, 2001[7] 候利娟, 王國撤, 聶能, 吳渝. 粗糙集理論中的離散化問題[J]. 計算機科學, 2007(12): 89—94[8] 王國. Rough集理論與知識獲取[M]. 西安: 西安交通大學出版社, 2001[9] Zadeh,Lotfi A., Fuzzy Logic, Neural Networks, and Soft Computing. Communications of the ACM, March 1994, 37(3)[10] . Rough sets and intelligent data analysis[J]. Information Sciences, 2002,(4)[11] . Fuzzy selforganizing controller and its application for dynamic processes[J]. Fuzzy Sets and Systems. 1998(26)[12] 曾黃麟. 智能計算[M]. 重慶大學出版社. 2004[13] . ROUGH SETS: Theoretical Aspects of Reasoning about Data[M]. Kluwer Academic Publishers: 1991[14] 何亞群, 胡壽松. 粗糙集中連續(xù)屬性離散化的一種新方法[J]. 南京航空航天大學學報. 2003(3)[15] 于海濤. Rough集理論在數(shù)據(jù)約簡中的應用[J]. 安徽教育學院學報. 2004(3)[16] 劉文軍,谷云東,李洪興. 基于區(qū)分矩陣求決策算法的約簡[J]. 北京師范大學學報(自然科學版). 2003(3)[17] 應可福,薛恒新. 基于重要性的顧客滿意度指數(shù)的測評[J]. 商業(yè)研究. 2005(22)[18] 劉文軍,王加銀,馮艷賓,谷云東,李洪興. 一種求粗糙集中最小屬性約簡的新算法[J]. 北京師范大學學報(自然科學版). 2004(1)[19] 程玉勝. 粗集理論約簡及其應用的研究[M]. 合肥工業(yè)大學. 2003[20] 王巖,隋思漣,王愛青. 數(shù)理統(tǒng)計與MATLAB工程數(shù)據(jù)分析[M]. 北京:[21] 張志涌,徐彥琴. MATLAB教程——[M].北京:北京航空航天大學出版社. 2004[22] 吳濤. 構造性知識發(fā)現(xiàn)方法研究[M]. 安徽大學. 2003[23] 趙軍. 基于粗集理論的KDD技術研究[M]. 重慶大學. 2003附 錄：function y=ind(a，x)[p，q]=size(x)。 [ap，aq]=size(a)。 z=[]。for u=1:q， z=cat(2，z，u)。 endtt=setdiff(z，a)。 [ttp，ttq]=size(tt)。for r=ttq:1:1， x(:，tt(r))=[1]。endfor r=q:1:1， if x(1，r)==1， x(:，r)=[]。 endend%i=find(x(1，q:1:1)==1)。 x(:，i)=[]。y=x。 for i=1:p， v(i)=codea(aq，y(i，:)，10)。end y=v39。 [yy，I]=sort(y)。 y=[yy I]。[b，k，l]=unique(yy)。 y=[l I]。 m=max(l)。 aa=zeros(m，p)。for ii=1:m for j=1:p if l(j)==ii， aa(ii，j)=[I(j)]。 end endendy=aa。 function yy=codea(a，x，b)yy=0。for i=1:a， yy=yy+x(i)*b^(ai)。 end ：function w=Rsupper(y，a，T)z=ind(a，T)。 w=[]。 [p，q]=size(z)。for u=1:p zz=setdiff(z(u，:)，0)。 zzz=intersect(zz，y)。 [zp，zq]=size(zzz)。 if zq~=0， w=cat(2，w，zz)。 endendw=sort(w，2)。：function w=Rslower(y，a，T)z=ind(a，T)。 w=[]。 [p，q]=size(z)。for u=1:p zz=setdiff(z(u，:)，0)。 if ismember(zz，y)， w=cat(2，w，zz)。 endendw=sort(w，2)。：function [y，b]=pospq(p，q)[pm，pn]=size(p)。 [qm，qn]=size(q)。 q1=zeros(qm，1)。q=cat(2，q，q1)。 num=0。 b=[]。for i=1:pm， pp{i}=unique(p(i，:))。 endfor j=1:qm， qq{j}=unique(q(j，:))。 endfor i=1:qm for j=1:pm if ismember(pp{j}，qq{i})， num=num+1。 b=cat(2，b，pp{j})。 end endendbb=unique(b)。 [cc，dd]=size(bb)。if ismember(0，bb) y=(dd1)/pn。else y=dd/pn。endb=setdiff(bb，0)。：function y=core(c，d，x)[xp，xq]=size(x)。 [cp，cq]=size(c)。 [dp，dq]=size(d)。y=[]。 q=ind(d，x)。 pp=ind(c，x)。 [b，w]=pospq(pp，q)。for u=1:cq a{u}=setdiff(c，u)。 p{u}=ind(a{u}，x)。 [k{u}，kk{u}]=pospq(p{u}，q)。 if k{u}~=b， y=cat(2，y，u)。 endend：function y=redu(c，d，x)% y=core(c，d，x)。 q=ind(d，x)。 p=ind(c，x)。pos_cd=pospq(p，q)。 re=y。 red=ind(y，x)。 pos_red=pospq(red，q)。while pos_cd~=pos_red cc=setdiff(c，re)。 [c1，c2]=size(cc)。 for i=1:c2， yy(i)=sgf(cc(i)，re，d，x)。 end cd=setdiff(c，y)。 [d1，d2]=size(cd)。 for i=d2:1:c2+1， yy(i)=[]。 end [zz，ii]=sort(yy)。 for v1=c2:1:1 v2=ii(v1)。 re=cat(2，re，cc(v2))。 red=ind(re，x)。 pos_red=pospq(red，q)。 endend[re1，re2]=size(re)。for qi=re2:1:1 if ismember(re(qi)，core(c，d，x))， y=re。 break。 end re=setdiff(re，re(qi))。 red=ind(re，x)。 pos_red=pospq(red，q)。 if pos_cd==pos_red， y=re。 endend[y1，y2]=size(y)。 j=1。 for i=1:y2， [y，j]=redu2(j，y，c，d，x)。 end function [y，j]=redu2(i，re，c，d，x)%i index，re reduce yre=re。 [re1，re2]=size(re)。 q=ind(d，x)。p=ind(c，x)。 pos_cd=pospq(p，q)。for qi=i:re2 re=setdiff(re，re(qi))。 red=ind(re，x)。 pos_red=pospq(red，q)。 if pos_cd==pos_red y=re。 j=i。 break else y=yre。 j=i+1。 break endend