Displaying 1 result from an estimated 1 matches for "fl_br14".
2004 Aug 26
3
Beginner troubles.
...I have a file which contains the coordinates of a set of points in
R^3, with one point per line (i.e. three real numbers). The aim is to
read that file in and produce the set of all the distances between all
possible different pairs of points in that file. So I try:
> a <- read.table("FL_BR14.xyz")
> dim(a)
[1] 329 3
> A <- function(i) a[i, ]
> A(1)
V1 V2 V3
1 -1558.364 16.97055 1004.381
> d <- function(x, y) sqrt(sum((x - y) * (x - y)))
> outer(1:length(a[, 1]), 1:length(a[, 1]), function(u,
v) d(A(u), A(v)))
Error in outer(1:l...