数据挖掘导论.docVIP

19.对于下面的向量x和y，计算指定的相似性或距离度量。 (a)x=(1,1,1,1),y=(2,2,2,2)余弦、相关、欧几里得。 (b)x=(0,1,0,1),y=(1,0,1,0)余弦、相关、欧几里得、Jaccard 。 (c)x=(0,-1,0,1),y=(1,0,-1,0)余弦、相关、欧几里得。 (d)x=(1,1,0,1,0,1),y=(1,1,1,0,0,1)余弦、相关、Jaccard 。 (e)x=(2,-1,0,2,0,-3),y=(-1,-1,-1,0,0,-1)余弦、相关。 #（a） x=c(1,1,1,1) y=c(2,2,2,2) #欧几里得 s2=sum((y-x)^2) p=sqrt(s2) p #余弦相似性 xy-sum(x*y) x1=sqrt(sum(x^2)) y1=sqrt(sum(y^2)) cosxy=xy/(x1*y1) cosxy #相关性 x=c(1,1,1,1) y=c(2,2,2,2) n=length(x) #求x的字符串长度 x0=sum(x)/n #计算均值 y0=sum(y)/n covariance-sum((x-x0)*(y-y0))/(n-1) covariance standardx-sqrt((sum((x-x0)^2))/(n-1)) standardx standardy-sqrt((sum((y-y0)^2))/(n-1)) standardy corrxy=covariance/(standardx*standardy) corrxy #（b） #余弦 x-c(0,1,0,1) y-c(1,0,1,0) xy-sum(x*y) x1=sqrt(sum(x^2)) y1=sqrt(sum(y^2)) cosxy=xy/(x1*y1) cosxy #相关性 x-c(0,1,0,1) y-c(1,0,1,0) n=length(x) #求x的字符串长度 x0=sum(x)/n #计算均值 y0=sum(y)/n covariance-sum((x-x0)*(y-y0))/(n-1) covariance standardx-sqrt((sum((x-x0)^2))/(n-1)) standardx standardy-sqrt((sum((y-y0)^2))/(n-1)) standardy corrxy=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 #Jaccard x-c(0,1,0,1) y-c(1,0,1,0) xy-sum(x*y) x2=sum(x^2) y2=sum(y^2) EJ=xy/(x2+y2-xy) EJ #(c) #余弦 x=c(0,-1,0,1) y=c(1,0,-1,0) xy-sum(x*y) x1=sqrt(sum(x^2)) y1=sqrt(sum(y^2)) cosxy=xy/(x1*y1) cosxy #相关 x=c(0,-1,0,1) y=c(1,0,-1,0) n=length(x) #求x的字符串长度 x0=sum(x)/n #计算均值 y0=sum(y)/n covariance-sum((x-x0)*(y-y0))/(n-1) covariance standardx-sqrt((sum((x-x0)^2))/(n-1)) standardx standardy-sqrt((sum((y-y0)^2))/(n-1)) standardy corrxy=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 #（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(x^2)) y1=sqrt(sum(y^2)) cosxy=xy/(x1*y1) cosxy #相关 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)/n covariance-sum((x-x0)*(y-y0))/(n-1) covariance standardx-sqrt((sum((x-x0)^2))/(n-1)) standardx standardy-sqrt((sum((y-