Liez le graphe de connectivité d'une molécule
Des graphes et des réseaux prêts à l'emploi provenant de collections référencées, incluant ChemicalData.
La structure basique pour la caféine.
In[1]:=
ChemicalData["Caffeine", "StructureGraph"]Out[1]=

Affichez deux structures de molécules d'acide.
In[2]:=
ChemicalData[#, "StructureGraph"] & /@ {"NEthylmethylamine",
"Propylamine"}Out[2]=

Testez si deux graphes sont isomorphes.
In[3]:=
ChemicalData[#, "StructureGraph"] & /@ {"NEthylmethylamine",
"Propylamine"};
IsomorphicGraphQ @@ %Out[3]=