Revision 5599 of "R estatistika softwarea/Oinarrizko grafikoak" on euwikibooks

R bereziki egokia da, estatistikako beste programen aldean, [[:w:datu-diagrama|datu-diagramak]] eratu eta manipulatzeko.

== Sektore diagramak ==

Sektore diagramen bitartez aldagai kualitatibo bateko maiztasunak (absolutuak edo erlatiboak) irudikatu nahi dira. Beraz, lehendabizi maiztasunak kalkulatu behar dira, absolutuetarako ''table'' agindua erabiliz eta erlatiboetarako ''prop.table'' agindua erabiliz aurrekoaren gainean:

<source lang = "rsplus">
> tele=c("s","n","a","n","s","l")
> telefonoak=factor(tele,levels=c("s","n","a","l"),labels=c("Samsung","Nokia","Apple","LG"))
> telefono.abs=table(telefonoak)
> telefono.abs
telefonoak
Samsung   Nokia   Apple      LG 
      2       2       1       1 
> telefono.erl=prop.table(telefono.abs)
> telefono.erl
telefonoak
  Samsung     Nokia     Apple        LG 
0.3333333 0.3333333 0.1666667 0.1666667 
> telefono.erl.bor=round(telefono.erl,digits=2)
telefonoak
Samsung   Nokia   Apple      LG 
   0.33    0.33    0.17    0.17 
</source>

Sektore-diagrama eratzeko ''pie'' agindua erabiltzen da. Ohikoena maiztasun erlatiboekin egitea denez, ''telefono.erl.bor'' emaitzen gainean baliatzen dugu:

<source lang = "rsplus">
pie(telefono.erl.bor)
</source>

Sektoreen ondoan izenez gainera maiztasun erlatiboak agertzea nahi bada, etiketak sortu (''paste'' aginduaren bitartez elementuak bateratuz) eta ''labels'' aukeraren bitartez aplikatzen ditugu. Koloreak ere alda daitezke ''col'' aukeraren bitartez, koloreen bektore bati aplikatuta. Izenburua ''main'' aukeraren bitartez gaineratzen da, ''cex'' aukeraren bitartez tipoaren tamaina ezarriz.

<source lang = "rsplus">
>etiketak=paste(c("Samsung","Nokia","Apple","LG"),tele.erl.bor,"%")
>kolore=c("yellow","blue","green","red")
>pie(telefono.erl.bor,labels=etiketak,col=kolore,cex=0.8,main="Telefono marken banaketa")
</source>