Calculation of the square of the Euclidean distance between two atoms
eucldist2(atom1, atom2)
atom1 | |
---|---|
atom2 |
##---- Should be DIRECTLY executable !! ---- ##-- ==> Define data, use random, ##-- or do help(data=index) for the standard data sets. ## The function is currently defined as function(atom1, atom2) { dist2 <- (atom1$x - atom2$x)^2 + (atom1$y - atom2$y)^2 + (atom1$z - atom2$z)^2 }#> function(atom1, atom2) { #> dist2 <- (atom1$x - atom2$x)^2 + (atom1$y - atom2$y)^2 + (atom1$z - atom2$z)^2 #> } #> <environment: 0x111399a40>