4

3

I'm attempting to use Mathematica to manually create a graph from a set of GPS coordinates (vertices). This graph will define the paths an autonomous rover will travel along. Here's what I have so far with sample points:

```
names = {"p01", "p02", "p03", "p04", "p05", "p06"};
coordinates =
SetPrecision[
Map[GeoPosition, {{-33.004560, 134.595354}, {-33.004757,
134.600941}, {-33.009869, 134.602529}, {-33.011276,
134.589902}, {-33.004574, 134.606091}, {-33.002037,
134.594315}}], 9];
bounds = {{-33.013276, -33.001649}, {134.588632, 134.607482}};
saltMap =
GeoImage[GeoRange -> bounds, GeoRangePadding -> None,
GeoProjection -> "Mercator"];
labeledCoordinates = MapThread[Labeled[#1, #2] &, {coordinates, names}];
GeoListPlot[labeledCoordinates, GeoRange -> bounds, GeoRangePadding -> None, GeoProjection -> "Mercator",
GeoBackground -> saltMap, ImageSize -> 800]
```

Which outputs this What I want this program to do is to let me click pairs of vertices and draw an edge between them. Ideally It would also generate a Graph from these labeled vertices and edges, but simply displaying points and edges graphically would be good enough. The real data I will be using is of hundreds of points within about a square km but with sparse connections. Could some of you wizards please help? I'm very new to Mathematica. Cheers!

1

Have you seen this?

– CA Trevillian – 2020-05-22T21:00:25.503I have now! Thank you very much. – Nicolas – 2020-05-24T01:50:01.857