Distancia euclídea incorrecta Cálculos de H2O R
Estoy usando H2O con R para calcular la distancia euclidiana entre 2 data.frames:
set.seed(121)
#create the data
df1<-data.frame(matrix(rnorm(1000),ncol=10))
df2<-data.frame(matrix(rnorm(300),ncol=10))
#init h2o
h2o.init()
#transform to h2o
df1.h<-as.h2o(df1)
df2.h<-as.h2o(df2)
si uso cálculos normales, es decir, la primera fila:
distance1<-sqrt(sum((df1[1,]-df2[1,])^2))
Y si uso la biblioteca H2O:
distance.h2o<-h2o.distance(df1.h[1,],df2.h[1,],"l2")
print(distance1)
print(distance.h2o)
La distancia1 y la distancia.h2o no son lo mismo. ¿Alguien sabe por qué? ¡¡Gracias!!