Novos Recursos do
Mathematica
8: Visualização Científica e de Informação Novas e Melhoradas
◄
anterior
|
próximo
►
Gráficos & Visualização
Use funções de escalamento personalizadas
Crie funções de escalamento personalizadas para suas visualizações.
In[1]:=
X
countries = CountryData[]; properties = {"PovertyFraction", "GDPPerCapita", "Population"}; data = Table[CountryData[c, p], {c, countries}, {p, properties}];
In[2]:=
X
BubbleChart[data, ChartStyle -> "Rainbow", ChartLabels -> Placed[countries, Tooltip], FrameLabel -> {"Poverty Fraction", "GDP Per Capita"}, PlotLabel -> "Worldwide GDP per Capita vs. Poverty Rate", ScalingFunctions -> {{Log[-Log[1 - #1]] &, InverseFunction[Log[-Log[1 - #1]] &]}, "Log", None}, FrameTicks -> {{Automatic, Automatic}, {{#/100., #} & /@ {1, 2, 5, 10, 20, 30, 40, 50, 60, 70, 80, 90, 95, 99}, None}}, BaseStyle -> {FontFamily -> "Helvetica", FontSize -> 16}]
Out[2]=