자신의 특성에 기반한 분자의 그룹화
ChemicalData에서 산의 데이터를 로드하여 그 화학식과 특성을 추출합니다.
In[1]:=
acids = Take[ChemicalData["Acids"], {3, 18}]
Out[1]=
In[2]:=
properties =
Outer[ChemicalData, acids, {"MolarMass", "MeltingPoint"}, 1]
Out[2]=
In[3]:=
formulas = ChemicalData[#, "Formula"] & /@ acids
Out[3]=
특성에 기반하여 산의 계층적 클러스터를 시각화합니다.
In[4]:=
ClusteringTree[properties -> formulas]
Out[4]=