Árbol de expansión rápido 

Compare los tiempos para computar árboles de expansión para gráficos. Se realizaron experimentos en un sistema Intel Core i7 2.93 GHz Windows 7, con un tiempo límite de 1000 segundos.

muestre la entrada completa de Wolfram Languageoculte la entrada

In[1]:=

X (* Random Graphs *) SeedRandom[1] data = Table[RandomGraph[{i, 5000}], {i, 10000, 100000, 10000}]; (* timing *) timing = First[AbsoluteTiming[FindSpanningTree[#]]] & /@ data;

Out[1]=