數(shù)據(jù)挖掘?qū)д?頁_第1頁
數(shù)據(jù)挖掘?qū)д?頁_第2頁
數(shù)據(jù)挖掘?qū)д?頁_第3頁
數(shù)據(jù)挖掘?qū)д?頁_第4頁
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、19.對于下面的向量x和y，計算指定的相似性或距離度量。(a)x=(1,1,1,1),y=(2,2,2,2)余弦、相關(guān)、歐幾里得。(b)x=(0,1,0,1),y=(1,0,1,0)余弦、相關(guān)、歐幾里得、Jaccard 。(c)x=(0,-1,0,1),y=(1,0,-1,0)余弦、相關(guān)、歐幾里得。(d)x=(1,1,0,1,0,1),y=(1,1,1,0,0,1)余弦、相關(guān)、Jaccard 。(e)x=(2,-1,0,2,0,-3),y=(-1,-1,-1,0,0,-1)余弦、相關(guān)。#（a）x=c(1,1,1,1)y=c(2,2,2,2)#歐幾里得s2=sum(y-x)2)p=sqrt(s2

2、)p#余弦相似性xy<-sum(x*y)x1=sqrt(sum(x2)y1=sqrt(sum(y2)cosxy=xy/(x1*y1)cosxy#相關(guān)性x=c(1,1,1,1)y=c(2,2,2,2)n=length(x) #求x的字符串長度x0=sum(x)/n #計算均值y0=sum(y)/ncovariance<-sum(x-x0)*(y-y0)/(n-1)covariancestandardx<-sqrt(sum(x-x0)2)/(n-1)standardxstandardy<-sqrt(sum(y-y0)2)/(n-1)standardycorrxy=covar

3、iance/(standardx*standardy)corrxy#（b）#余弦x<-c(0,1,0,1)y<-c(1,0,1,0)xy<-sum(x*y)x1=sqrt(sum(x2)y1=sqrt(sum(y2)cosxy=xy/(x1*y1)cosxy#相關(guān)性x<-c(0,1,0,1)y<-c(1,0,1,0)n=length(x) #求x的字符串長度x0=sum(x)/n #計算均值y0=sum(y)/ncovariance<-sum(x-x0)*(y-y0)/(n-1)covariancestandardx<-sqrt(sum(x-x0)2)

4、/(n-1)standardxstandardy<-sqrt(sum(y-y0)2)/(n-1)standardycorrxy=covariance/(standardx*standardy)corrxy#歐幾里得x<-c(0,1,0,1)y<-c(1,0,1,0)s2=sum(y-x)2)p=sqrt(s2)p#Jaccardx<-c(0,1,0,1)y<-c(1,0,1,0)xy<-sum(x*y)x2=sum(x2)y2=sum(y2)EJ=xy/(x2+y2-xy)EJ#(c)#余弦x=c(0,-1,0,1)y=c(1,0,-1,0)xy<-s

5、um(x*y)x1=sqrt(sum(x2)y1=sqrt(sum(y2)cosxy=xy/(x1*y1)cosxy#相關(guān)x=c(0,-1,0,1)y=c(1,0,-1,0)n=length(x) #求x的字符串長度x0=sum(x)/n #計算均值y0=sum(y)/ncovariance<-sum(x-x0)*(y-y0)/(n-1)covariancestandardx<-sqrt(sum(x-x0)2)/(n-1)standardxstandardy<-sqrt(sum(y-y0)2)/(n-1)standardycorrxy=covariance/(standard

6、x*standardy)corrxy#歐幾里得x=c(0,-1,0,1)y=c(1,0,-1,0)s2=sum(y-x)2)p=sqrt(s2)p#（d)x=c(1,1,0,1,0,1),y=c(1,1,1,0,0,1)）#余弦x=c(1,1,0,1,0,1)y=c(1,1,1,0,0,1)xy<-sum(x*y)x1=sqrt(sum(x2)y1=sqrt(sum(y2)cosxy=xy/(x1*y1)cosxy#相關(guān) x=c(1,1,0,1,0,1),y=c(1,1,1,0,0,1)n=length(x) #求x的字符串長度x0=sum(x)/n #計算均值y0=sum(y)/nco

7、variance<-sum(x-x0)*(y-y0)/(n-1)covariancestandardx<-sqrt(sum(x-x0)2)/(n-1)standardxstandardy<-sqrt(sum(y-y0)2)/(n-1)standardycorrxy=covariance/(standardx*standardy)corrxy#Jaccardx=c(1,1,0,1,0,1)y=c(1,1,1,0,0,1)xy<-sum(x*y)x2=sum(x2)y2=sum(y2)EJ=xy/(x2+y2-xy)EJ#（e）x=(2,-1,0,2,0,-3),y=(-1,-1,-1,0,0,-1)#余弦x=c(2,-1,0,2,0,-3)y=c(-1,-1,-1,0,0,-1)xy<-sum(x*y)x1=sqrt(sum(x2)y1=sqrt(sum(y2)cosxy=xy/(x1*y1)cosxy#相關(guān)x=c(2,-1,0,2,0,-3)y=c(-1,-1,-1,0,0,-1)n=length(x) #求x的字符串長度x0=sum(x)/n #計算均值y0=sum(y)/ncovariance<-sum(x-x0)*(y-y0)/(n-1)covariancestandardx&l

溫馨提示

  • 1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論