Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: Euclidean distance of all pairwise combinations (redundants)
Replies: 7   Last Post: Nov 18, 2012 4:02 AM

 Messages: [ Previous | Next ]
 Dana DeLouis Posts: 107 Registered: 12/14/08
Re: Euclidean distance of all pairwise combinations (redundants)
Posted: Nov 17, 2012 3:51 AM

> Any ideas on how to get the euclidean distance between all the points
including redundants and self references?

Just for fun, and to add complexity, heres one more but with the output
in table form. :>)

list={{1,1},{2,2},{3,3},{4,5}};

(* Edge List - el *)

el=UndirectedEdge@@@Subsets[list,{2}];

g=Graph[el,EdgeWeight->EuclideanDistance@@@el];

= = = = = = = = = =
HTH :>)
Mac & Math 8
=E2=80=A8Dana DeLouis
=E2=80=A8= = = = = = = = = =

On Tuesday, November 13, 2012 10:35:53 PM UTC-8, Jesse Pisel wrote:
> I have been having a tough time trying to figure out how to include =
all red undant pairwise combinations in my results for the euclidean =
distance between a set of points. I have a set of points with xy =
coordinates and want the euclidean distance between each point including =
the point and itself. So if my points in xy space are list = {{1, 1}, =
{2, 2}, {3, 3}} for example, I want the distance from {1, 1} to {1, 1}, =
{1, 1} to {2, 2}, and {2, 2} to {3, 3} etc. for each point for a total =
of 9 distances all together. The EuclideanDistance function removes the =
redundant distances that I want retained in the results. I have been =
using this code just to play with data but would like to be able to =
expand up to 500+ points:
>
>
>
> list = {{1, 1}, {2, 2}, {3, 3}}
>
> EuclideanDistance @@@ Subsets[list, {2}]
>
>
>
> Any ideas on how to get the euclidean distance between all the points =

including redundants and self references?

Date Subject Author
11/15/12 Ralph Dratman
11/15/12 Sseziwa Mukasa
11/15/12 Jesse Pisel
11/15/12 Bob Hanlon
11/15/12 Bob Hanlon
11/17/12 Dana DeLouis
11/18/12 Joseph Gwinn