From e9d8780c73660091e30c28299263efbc257d3351 Mon Sep 17 00:00:00 2001
From: Barbier--Darnal Joseph Treemap
square area is proportionnal to its value: the population here.
library(treemap)
-p <- treemap(data,
-
- # data
- index=c("Continent", "Region", "Country"),
- vSize="Pop",
- type="index",
- title="",
- palette="Dark2",
-
- # Borders
- border.col=c("black", "grey", "grey"),
- border.lwds=c(1,0.5,0.1),
-
- # Labels
- fontcolor.labels=c("white", "white", "black"),
- fontface.labels=1,
- bg.labels=c("transparent"),
- align.labels=list( c("center", "center"), c("left", "top"), c("right", "bottom")),
- overlap.labels=0.5
-)
Here, the importance of Asia pops out obviously. It is also possible to understand that Southern and Eastern Asia are the most densely @@ -419,8 +421,8 @@
mHNFp2q%}%5jM3xq+Sa_o*U^tH`?!{n0p~1MHiApj0!5Zz
zB$&@*cdjwCN<;^=OMiZsd^2Wg#vY;(i8RVWb{}E)c)fe})Xx3^znvt2heQ}h!=}}E
zB{>qL-AGr6ZrtP^^mTh}L}@j73?ipHhj33dnJoFtKy&~nJ$_WYH{9nGhy63wheUET
z8-M-J1to}tht_$AMb>$b3!A6FK8B}vK=UWt_mPvs8FtBH5Y^>$S>J`VCRGP=ppSLA
z$25YaGu1qY9GhHH*dsAz@-908MFDvd-Kd6nocWBPJSxv{8l{{0P3z3O4+NEZ4qt3X
z?4g&$(7Tm+`ewt_pnMJ=`k$#kQ+8viOO8f@0gl?S?b2E~?Tc F^>m2{A#yv~I;KV5R%((V0_Ou$~i!{rMB({d-MK49e}U
zJHOxTnl&4ke22NAHpE$7b;WElw$xTjcqY_w5Pq`14%@{l#>H_F3~~ysWjuL*nEj=J
z-{v~wXb#fan*o>P1XY&z2sRH%O~-i8$#V0(B3+V)W;^68n3T-IeKFJa^UTb%x`yj?
zmIF+0KXPM7G`wVwq_`=L^){^|VyM>xrZ1pve8GlXmTzyPz|-fv1 S1kP~Qrs{^iegTpu$h
z3uvYNJI>q{N9x*OR-UP9Thj5j;$jl?a(H%SqJ}jeWHy-XKg?=GmkH;XPq<+h-%#d=
z>ZPzch((vFoKa5SEG4WJ{;kN-@uHOzX+rg*Szm8!TML{=B_cT(IFI0^Lu!6J9*`WA
zt7*WW>-crnnjwdIdGpnzmb}KT{qnI2hGuw?TNg0pUx3u(R?N*l_2(*7h;c?ptRITaj%E5Q9eNDw?C!bd4W_
zmqFkN5P7Kf5>C@YO-ADXPtX(9Bf-?F+BJAYnSpnLgDTOS*Vdq+Q{f@{?VCidPop@_
ztO)bsAeg}3N9AedV?<;Ck$95DKLQ-pDvh5$Nuo$h&WB4z?MJyv3c2q^h@}%s6Ke}2
z)Al1W5)~(?#6f25RAjW8#;}a%y3wTk&yYa;M^l3Hd6%MpuP(MUskoUmrA|SKQ@N~e
zYgax31tQB;i2$IdxI?=-`Y;rnZsO$b{ClDKYcxbKxQ6;!o4K>Qk7E@VAo0dcA5J#f
z6rLt=V0|0?o((FuT99j~SkFG)H!vlCv6p7>E`Snq{Owt5!6-8GcW!pkpxkFYMtlr^
z*_Rc`?{3&BCiQEU6Vi<%J+KlB%Vk6jQ_s~AIKUbg_xLuHXnj5B#q;c0sX=T(X?>F8
z@m@C~D!}v6%v79zhSx8iRZsl5BMOH<+h)q=1Grx%fW}$rl{@qY}JkLJ+
zdiDj^0!!Ut#o$8MGPR5F#MRfZ2)TSI)`4YG`-~)&eA=|M@cD67njrOfMI4fh$B9DI
zBFWXyW+)9vhh0y0mhG=^E~V_8<6THwzD@SEQ>RFkCt$xxblbmgKb9JaG*bLAtw5U7
zmT|;>(m{7qRB(p!4;My2CVIX4LWa`d`f$7Ce5d6MJdWVVQf|TI(Z%g?*)Gy`vAVw0
z>2n$GwP+pW!ae~d9)9}#q34Pq7eJ56%RBQGz(a5)Sth3825{l_ZsF{}P8M%9+&wRi
z6z@T~*Xk33O-jr)gZrGnb`*VKD9ldsP3;C5b19c0vLa9M1w?h=q(~Ld)zwiHC*50(
zRNzvOSMjSd9ZHfS+EGs1PT
z?v?;-mD=^VhKKiRnz5OS-H}e`pq}VMw_F5%{}4a#BJ>2tVd@SSOa3)x@^3%)=T%A>
zEZWeF{{P2aWX?^pcOL)sw4hf6GA~$Tr<$6~eNo)V;Sht7dNEwx@uB)CttX^^s*#gc
zSV*r^`04GR!8BAR_Mn<&1!954=5OALp12}ZaUyp}AHD<#NIiZ-`sdwOmEj)9N3usl
z4gX?n4rv)Hv@UbE`9hROaYc+
iBwI>Ya8RF9@V_ZH