Wolfram Language

Visualisation: Étiquettes, Échelles, Exclusions

Système d'étiquette avec des attributs de points

Létiquetage de points de dispersion avec des étiquettes de différentes longueurs peut être difficile si cela se fait manuellement. Le nouveau système d'étiquetage fournit une solution automatique.

Voici un exemple de traçage du PIB versus la population pour tous les pays européens.

Montrer l'entrée complète de Wolfram Language
In[1]:=
Click for copyable input
options = {ImageSize -> 550, PlotTheme -> "Detailed", PlotLabel -> "GDP vs. Population for European Countries", FrameLabel -> {"Population", "GDP"}, LabelStyle -> 10, PlotStyle -> PointSize[0.01], PlotRangePadding -> Scaled[.06]};
In[2]:=
Click for copyable input
countries = CountryData["Europe"]; allCountryData = DeleteMissing[ EntityValue[CountryData["Europe"], {"Population", "GDP", "Name"}], 1, Infinity];

Affichez 20 exemples avec l'étiquetage automatique dattributs de points.

In[3]:=
Click for copyable input
ListLogLogPlot[ allCountryData[[1 ;; 20, {1, 2}]] -> allCountryData[[1 ;; 20, 3]], options]
Out[3]=

Lorsque les points sont trop concentrés et en trop grand nombre, utiliser des étiquettes combinées avec une légende peut bien fonctionner.

In[4]:=
Click for copyable input
legend = Multicolumn[ Table[Text@ Row[{ToString[i] <> ".", allCountryData[[i]][[3]]}, " "], {i, Length[allCountryData]}], 5];
In[5]:=
Click for copyable input
Legended[ListLogLogPlot[allCountryData[[All, {1, 2}]], LabelingFunction -> (First@#2 &), options], Placed[legend, Bottom]]
Out[5]=

Exemples connexes

de en es ja ko pt-br ru zh