Vincule el grafo de conectividad de una molécula
Los grafos y redes ya hechos a partir de colecciones curadas, incluyendo ChemicalData.
La estructura básica para la cafeína.
In[1]:=
![Click for copyable input](assets.es/bond-connectivity-graph-of-a-molecule/In_27.png)
ChemicalData["Caffeine", "StructureGraph"]
Out[1]=
![](assets.es/bond-connectivity-graph-of-a-molecule/O_22.png)
Muestre dos estructuras de moléculas de ácido.
In[2]:=
![Click for copyable input](assets.es/bond-connectivity-graph-of-a-molecule/In_28.png)
ChemicalData[#, "StructureGraph"] & /@ {"NEthylmethylamine",
"Propylamine"}
Out[2]=
![](assets.es/bond-connectivity-graph-of-a-molecule/O_23.png)
Pruebe si dos grafos son isomórficos.
In[3]:=
![Click for copyable input](assets.es/bond-connectivity-graph-of-a-molecule/In_29.png)
ChemicalData[#, "StructureGraph"] & /@ {"NEthylmethylamine",
"Propylamine"};
IsomorphicGraphQ @@ %
Out[3]=
![](assets.es/bond-connectivity-graph-of-a-molecule/O_24.png)