R语言求欧氏距离
代码如下："%~%"<-function(x1,x2){+t=0.0+for(iinlength(x1)){+t=t+((x1[i]-x2[i])^2)+}+e=sqrt...
代码如下：
"%~%"<-function(x1,x2){
+ t=0.0
+ for (i in length(x1)){
+ t=t+((x1[i]-x2[i])^2)
+ }
+ e=sqrt(t)
+ e
+ }
c(1,2,3) %~% c(5,6,7)
为什么输出结果是4啊？
不应该是6.928203吗。 展开
"%~%"<-function(x1,x2){
+ t=0.0
+ for (i in length(x1)){
+ t=t+((x1[i]-x2[i])^2)
+ }
+ e=sqrt(t)
+ e
+ }
c(1,2,3) %~% c(5,6,7)
为什么输出结果是4啊？
不应该是6.928203吗。 展开
- 你的回答被采纳后将获得：
- 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）
1个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
