Groupez les éruptions de geyser
Visualisez les propriétés des éruptions du geyser Old Faithful.
In[1]:=

eruptions = ExampleData[{"Statistics", "OldFaithful"}];
ListPlot[eruptions,
FrameLabel -> {"Eruption time in minutes",
"Waiting time to next eruption in minutes"}, Frame -> True]
Out[1]=

Calculez un classifieur qui sépare les éruptions.
In[2]:=

c = ClusterClassify[eruptions]
Out[2]=

Visualisez le groupement.
In[3]:=

clusters = GatherBy[eruptions, c];
ListPlot[clusters,
FrameLabel -> {"Eruption time in minutes",
"Waiting time to next eruption in minutes"}, Frame -> True]
Out[3]=
