New in Wolfram
Mathematica
8: Modelado de grafos y de redes
◄
previous
|
next
►
Áreas de aplicación
Cree grafos moleculares
ChemicalData
puede usarse para construir grafos moleculares en
Mathematica
8. Este es el grafo de una molécula de cafeína.
In[1]:=
X
Graph[MapIndexed[Labeled[#2[[1]], #1, Center] &, ChemicalData["Caffeine", "VertexTypes"]], ChemicalData["Caffeine", "EdgeRules"], VertexSize -> Large, ImageSize -> 500, VertexCoordinates -> ChemicalData["Caffeine", "VertexCoordinates"], GraphStyle -> "SimpleLink", DirectedEdges -> False]
Out[1]=