Wolfram
Mathematica
8의 신기능: 새롭게 향상된 과학 및 정보 시각화 기능
◄
이전
|
다음
►
그래픽 및 시각화
스케일링 함수의 정의
시각화를 위해 스케일링 함수를 정의합니다.
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]=
