File:Euclidean minimum spanning tree.svg
From Wikimedia Commons, the free media repository
Euclidean_minimum_spanning_tree.svg (SVG file, nominally 270 × 269 pixels, file size: 9 KB)
[edit] Summary
A Euclidean minimum spanning tree of a random set of 25 points in the plane. Produced by Derrick Coetzee in Mathematica 4.1.1.0 using the following commands:
<< DiscreteMath`Combinatorica`
points = Table[{Random[], Random[]}, {x, 1, 25}]
Export["z:\pictures\Wikipedia\emst.eps",
ShowGraph[MinimumSpanningTree[Graph[Table[
Sqrt[(points[[i]][[1]] - points[[j]][[1]])^2 + (points[[i]][[2]] -
points[[j]][[2]])^2], {i, 1, 25}, {j, 1, 25}], points]]]]
I then loaded the .eps in Illustrator, redrew it (original .eps had weird artifacts when saved as .svg), and saved out as an .svg. I place this image in the public domain and release all rights to it. This vector version replaces Image:Euclidean_minimum_spanning_tree.png.
[edit] Licensing
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 23:35, 31 December 2005 | | 270×269 (9 KB) | Dcoetzee (talk | contribs) | (A Euclidean minimum spanning tree of a random set of 25 points in the plane. Produced by Derrick Coetzee in Mathematica 4.1.1.0 using the following commands: <pre><nowiki> << DiscreteMath`Combinatorica` points = Table[{Random[], ) |
- Edit this file using an external application (See the setup instructions for more information)
File links
The following 2 pages link to this file:
Global file usage
The following other wikis use this file:
- Usage of Euclidean minimum spanning tree.svg on enwiki
