Jooniste teljed ja äärised.

Jooniste teljed ja äärised

Telgede tähistused ja ulatus, joonise pealkiri.

Graafiku joonistamiseks kasutatavale käsule (plot, barplot, boxplot, hist, ...) on võimalik lisada lisaparameetreid, mis võimaldavad määrata joonise pealkirja (main="..."), telgede tähistusi (xlab="..", ylab="..") või sedagi, millised väärtused telgedel näha peaks olema (xlim=c(.., ..), ylim=c(.., ..)).

Näide:

plot(pikkus, kaal,
   xlab="x-telg", ylab="y-telg",
   main="Pealkiri",
   xlim=c(150, 210),
   ylim=c(40, 140) )

Pealkirja, telgedel kirjas olevate numbrite ja telgede tähistuste värvi ja kirjasuurust saab muuta (samuti ka kasutatavat fonti). Pealkirja teksti suurust määrab lisaprameeter cex.main=.., pealkirja värvi muudab lisaprameeter col.main=.. . Telgede tähsituste värvi saab muuta lisaprameetriga col.lab=.., telgede tähistuse kirja suurust saab muuta lisaparameetriga cex.lab=.., telgedel olevate numbrite (või muude väärtuste) kirjasuurust ja värvi saab muuta parameetritega cex.axis=.., col.axis=.. .

Näide:

plot(pikkus, kaal,
   xlab="x-telg", ylab="y-telg",
   main="Pealkiri",
   xlim=c(150, 210),
   ylim=c(40, 140),
   cex.main=1.2, col.main="red4",
   cex.lab=2, col.lab="red",
   col.axis="red2")

Vahel soovime määrata ka seda, mitu kriipsukest teljele tehakse ja mitu numbrit välja kirjutatakse. Lisaparameetrid
xaxp=c(.., .., ..)
ja
yaxp=c(.., .., ..)
võimaldavad määrata telje alguse, lõpu ja sellegi, mitu vahemikku peaks teljele alguse ja lõpu vahele jääma. Lisaparameeter las=... aga võimaldab muuta telgedele kantavate numbrite kirjutamise suunda. Lisaparameeter log="x" nõuab, et joonise x-telg oleks esitatud logaritmilises skaalas, log="y" nõuab aga seda, et y-telg oleks esitatud logaritmilises skaalas.

Kast joonise ümber, telgede eemaldamine.

Vaikimisi ümbritseb (enamasti) joonist kastike. Vahel võib tekkida soov eemadada ümbritsev kast kas täielikult või siis vaid mõni kasti külg, kaotada mõni telg jooniselt vms. Joonist ümbritseva kasti tüüpi kontrollib lisaparameeter bty="..",

telgesid saab eemaldada lisaparameetritega xaxt="n" või yaxt="n".

Lisaparameetri bty võimalikud valikud:
  "o" - kõik küljed olemas
  "]" - vasak külg puudu
  "c" - parem külg puudu
  "l" - (nagu L) ülemine ja parem külg puuduvad
  "u" - ülemine külg puudu
  "n" - ümbriskasti ei joonistata
  "7" - alumine ja vasak külg puuduvad

Täpsuse nõudmine telgede algus- ja lõpppunktis

Vaikimisi lisatakse xlim= või ylim= parameetriga nõutud väärtustele väike "iluvaru" - joonisel tegelikult nähtav ala on tsipakene suurem (ja vajadusel venitatakse seda veelgi, et telg saaks alata/lõppeda mingi ilusa ümmarguse numbriga. Kui tahame nõuda täpsust - näha ei tohi olla terakestki rohkem kui käskisime - siis peame joonistamiseks kasutatavale käsule lisama lisaparameetri xaxs="i" või yaxs="i". Vaata ka järgnevaid näiteid.

plot(pikkus, kaal,
   xlim=c(150, 200),
   ylim=c(21,120))

plot(pikkus, kaal,
   xlim=c(150, 200),
   ylim=c(21,120),
   xaxs="i")

plot(pikkus, kaal,
   xlim=c(150, 200),
   ylim=c(21,120),
   xaxs="i", yaxs="i")

Vaba ruum ühe joonise ümber

par(mar=c(.., .., .., ..,))

Vahel on tarvis joonise ümber jätta rohkem vaba ruumi - et sinna mahuks ära legend, vahel on telgede tähistused sedavõrd pikad, et ei taha mahtuda ära graafikule vms.

Joonise ümber reserveeritavat vaba ruumi (tähemärgi suurustes ridades) saab muuta (enne joonise tegemist) käsuga par(mar=c(all, vasakul, üleval, paremal))), kus all, vasakul jne asemel tuleb kirjutada, mitme tekstirea jagu vaba ruumi jätta joonise alla, joonisest vasakule jne. Vaikimisi väärtuseks on
par(mar=c(5.1, 4.1, 4.1, 2.1))
ehk joonise alla jäetakse ruumi 5,1 tekstirea jagu (kuhu siis peavad ära mahtuma ka telgede nimed, telgedele kantavad numbrid jms. Vaata ka lisatud joonist ja alltoodud kasutusnäidet.

Näide
Vajame legendi jaoks lisaruumi paremale poole joonist.
par(mar=c(5, 4.5, 2, 7))
plot(pikkus, kaal, pch=20,
   col=c("red", "blue")[sugu])
legend(205, 110,
   c("naised", "mehed"),
   fill=c("red", "blue"), xpd=NA)

Kommentaar:
Legend käsul vajame lisaparameetrit xpd=NA sest soovime legendi joonistada väljapoole "joonistusala". Tavaliselt ei ilmu väljapoole joonistusala sattuvad punktid/jooned/legendid nähtavale, nende nähtavakstegemiseks vajamegi käsku xpd=NA.

Vaba ruum jooniste grupi ümber

par(oma=c(.., .., .., ..,))

Kui üksiku joonise ümber jäetavat vaba ruumi saab kontrollida (enne joonistamise alustamist antava) käsuga par(mar=c(...)), siis jooniste grupi ümber jäetavat ruumi saab muuta käsuga
par(oma=c(all, vasakul,
üleval, paremal))),
kus all, vasakul jne asemel tuleb kirjutada, mitme tekstirea jagu vaba ruumi jätta jooniste grupi alla, joonistest vasakule jne.

Näide:

# mfrow=c(2,2) jätab graafikaaknasse ruumi kahele reale ja kahele veerule graafikutele;
# mar=c(0,0,0.5,0.5) tähendab, et üksiku graafiku ümber ruumi peaaegu ei jäeta;
# oma=c(7,7,5,5) nõuab aga graafikute grupi ümber rohkesti vaba ruumi

par(mfrow=c(2,2), mar=c(0,0,0.5,0.5), oma=c(7,7,5,5))

# Joonistamisel kasutame lisaparameetrit xpd=NA selleks, et telgede tähistused joonistatakse
# väljapoole mar-parameetri poolt määratud ala ehk (oma-käsu poolt vabaks jäetud ruumi)

plot(pikkus, SVR, xaxt="n", ylab="süstoolne vererõhk (mm)", xlab="", xpd=NA)
plot(kaal, SVR, yaxt="n", xaxt="n")
plot(pikkus, DVR, xlab="pikkus (cm)", ylab="diastoolne vererõhk (mm)", xpd=NA)
plot(kaal, DVR, yaxt="n", xlab="kaal (kg)",ylab="", xpd=NA)